Programming Languages Suite

home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual Foxpro 6.0 (Ent. Edition) / Vf6ent Extractor.EXE / GALLERY / _WEBVIEW.VCT < prev next >
FoxPro Memo File | 1998-05-26 | 161.3 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was processed as: FoxPro Memo File (other/foxProMemo).
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`1%`	dexvert	FoxPro Memo File `(other/foxProMemo)`	magic	Unsupported
`100%`	file	Adobe Photoshop Color swatch, version 0, 2580 colors; 1st RGB space (0), w 0x40, x 0, y 0, z 0 ; 2nd RGB space (0), w 0, x 0, y 0, z 0	default (weak)
`99%`	file	FoxPro FPT, blocks size 64, next free block index 2580, field type 1, field length 16, 1st item "VERSION = 3.00LastFilter"	default
`98%`	file	data	default
`57%`	TrID	Sybase iAnywhere memo files	default
`42%`	TrID	MacBinary 1	default (weak)
`100%`	siegfried	x-fmt/342 Microsoft FoxPro Memo	default (weak)
`100%`	xdgMime	image/x-tga	default
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 0a 14 00 00 00 40 | 00 00 00 00 00 00 00 00 |.......@|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00000210| 3d 20 20 20 33 2e 30 30 | 4c 61 73 74 46 69 6c 74 |=   3.00|LastFilt|
|00000220| 65 72 0a 04 00 1e fe 0a | 00 46 fc f7 00 00 03 fd |er......|.F......|
|00000230| fe 06 00 47 26 28 fe 03 | 00 55 06 00 0c 00 4c 4e |...G&(..|.U....LN|
|00000240| 00 00 00 01 00 00 00 21 | 41 72 69 61 6c 2c 20 30 |.......!|Arial, 0|
|00000250| 2c 20 39 2c 20 35 2c 20 | 31 35 2c 20 31 32 2c 20 |, 9, 5, |15, 12, |
|00000260| 31 33 2c 20 33 2c 20 30 | 0a 00 00 00 00 00 00 00 |13, 3, 0|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 01 00 00 00 08 | 5f 77 65 62 66 6f 72 6d |........|_webform|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 01 00 00 00 06 | 50 69 78 65 6c 73 00 00 |........|Pixels..|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 01 00 00 00 05 | 43 6c 61 73 73 00 00 00 |........|Class...|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 01 00 00 00 01 | 33 00 00 00 00 00 00 00 |........|3.......|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 00 01 00 00 00 04 | 66 6f 72 6d 00 00 00 00 |........|form....|
|00000390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 00 00 00 01 00 00 00 08 | 5f 77 65 62 66 6f 72 6d |........|_webform|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 00 01 00 00 00 2b | 54 6f 70 20 3d 20 31 32 |.......+|Top = 12|
|00000410| 0d 0a 4c 65 66 74 20 3d | 20 33 37 32 0d 0a 4e 61 |..Left =| 372..Na|
|00000420| 6d 65 20 3d 20 22 5f 72 | 65 73 69 7a 61 62 6c 65 |me = "_r|esizable|
|00000430| 22 0d 0a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |".......|........|
|00000440| 00 00 00 01 00 00 00 08 | 5f 77 65 62 66 6f 72 6d |........|_webform|
|00000450| 2e 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 01 00 00 00 0a | 5f 72 65 73 69 7a 61 62 |........|_resizab|
|00000490| 6c 65 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |le......|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 01 00 00 00 06 | 63 75 73 74 6f 6d 00 00 |........|custom..|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 01 00 00 00 14 | 2e 2e 5c 66 66 63 5c 5f |........|..\ffc\_|
|00000510| 63 6f 6e 74 72 6f 6c 73 | 2e 76 63 78 6e 74 72 6f |controls|.vcxntro|
|00000520| 6c 73 2e 76 63 78 00 00 | 00 00 00 00 00 00 00 00 |ls.vcx..|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 01 00 00 00 0a | 5f 72 65 73 69 7a 61 62 |........|_resizab|
|00000550| 6c 65 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |le......|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 01 00 00 00 2b | 4f 4c 45 4f 62 6a 65 63 |.......+|OLEObjec|
|00000590| 74 20 3d 20 43 3a 5c 57 | 49 4e 44 4f 57 53 5c 53 |t = C:\W|INDOWS\S|
|000005a0| 59 53 54 45 4d 5c 53 48 | 44 4f 43 56 57 2e 44 4c |YSTEM\SH|DOCVW.DL|
|000005b0| 4c 0d 0a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |L.......|........|
|000005c0| 00 00 00 01 00 00 0a 00 | d0 cf 11 e0 a1 b1 1a e1 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 3e 00 03 00 fe ff 09 00 | 06 00 00 00 00 00 00 00 |>.......|........|
|000005f0| 00 00 00 00 01 00 00 00 | 01 00 00 00 00 00 00 00 |........|........|
|00000600| 00 10 00 00 02 00 00 00 | 01 00 00 00 fe ff ff ff |........|........|
|00000610| 00 00 00 00 00 00 00 00 | ff ff ff ff ff ff ff ff |........|........|
|00000620| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000630| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000640| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000650| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000660| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000670| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000680| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000690| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000006a0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000006b0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000006c0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000006d0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000006e0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000006f0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000700| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000710| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000720| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000730| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000740| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000750| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000760| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000770| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000780| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000790| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000007a0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000007b0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000007c0| ff ff ff ff ff ff ff ff | fd ff ff ff fe ff ff ff |........|........|
|000007d0| fe ff ff ff fe ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000007e0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000007f0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000800| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000810| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000820| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000830| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000840| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000850| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000860| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000870| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000880| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000890| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000008a0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000008b0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000008c0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000008d0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000008e0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000008f0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000900| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000910| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000920| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000930| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000940| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000950| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000960| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000970| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000980| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000990| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000009a0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000009b0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000009c0| ff ff ff ff ff ff ff ff | 52 00 6f 00 6f 00 74 00 |........|R.o.o.t.|
|000009d0| 20 00 45 00 6e 00 74 00 | 72 00 79 00 00 00 00 00 | .E.n.t.|r.y.....|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 00 00 00 00 00 00 00 00 | 16 00 05 00 ff ff ff ff |........|........|
|00000a10| ff ff ff ff 01 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a30| 00 00 00 00 00 13 45 37 | f0 0c bd 01 03 00 00 00 |......E7|........|
|00000a40| 40 01 00 00 00 00 00 00 | 03 00 4f 00 6c 00 65 00 |@.......|..O.l.e.|
|00000a50| 4f 00 62 00 6a 00 65 00 | 63 00 74 00 44 00 61 00 |O.b.j.e.|c.t.D.a.|
|00000a60| 74 00 61 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.a.....|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a80| 00 00 00 00 00 00 00 00 | 1e 00 02 01 03 00 00 00 |........|........|
|00000a90| 02 00 00 00 ff ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ac0| ac 00 00 00 00 00 00 00 | 03 00 41 00 63 00 63 00 |........|..A.c.c.|
|00000ad0| 65 00 73 00 73 00 4f 00 | 62 00 6a 00 53 00 69 00 |e.s.s.O.|b.j.S.i.|
|00000ae0| 74 00 65 00 44 00 61 00 | 74 00 61 00 00 00 00 00 |t.e.D.a.|t.a.....|
|00000af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b00| 00 00 00 00 00 00 00 00 | 26 00 02 00 ff ff ff ff |........|&.......|
|00000b10| ff ff ff ff ff ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000b40| 38 00 00 00 00 00 00 00 | 03 00 43 00 68 00 61 00 |8.......|..C.h.a.|
|00000b50| 6e 00 67 00 65 00 64 00 | 50 00 72 00 6f 00 70 00 |n.g.e.d.|P.r.o.p.|
|00000b60| 73 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |s.......|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b80| 00 00 00 00 00 00 00 00 | 1c 00 02 00 ff ff ff ff |........|........|
|00000b90| ff ff ff ff ff ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 02 00 00 00 |........|........|
|00000bc0| 04 00 00 00 00 00 00 00 | 03 00 00 00 fe ff ff ff |........|........|
|00000bd0| fe ff ff ff 04 00 00 00 | fe ff ff ff ff ff ff ff |........|........|
|00000be0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000bf0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000c90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000ca0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000cb0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000cc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000cd0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000ce0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000cf0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000da0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000db0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000dc0| ff ff ff ff ff ff ff ff | 61 f9 56 88 0a 34 d0 11 |........|a.V..4..|
|00000dd0| a9 6b 00 c0 4f d7 05 a2 | 4c 00 00 00 73 26 00 00 |.k..O...|L...s&..|
|00000de0| 49 1b 00 00 01 00 00 00 | 05 00 00 00 00 00 00 00 |I.......|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 4c 00 00 00 |........|....L...|
|00000e00| 00 00 00 00 00 00 00 00 | 38 00 00 00 00 00 00 00 |........|8.......|
|00000e10| 01 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 00 00 00 00 00 00 | 38 00 00 00 00 00 00 00 |........|8.......|
|00000e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | 01 00 00 80 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e80| 00 00 00 00 00 00 00 00 | 01 00 00 00 e0 d0 57 00 |........|......W.|
|00000e90| 73 35 cf 11 ae 69 08 00 | 2b 2e 12 62 08 00 00 00 |s5...i..|+..b....|
|00000ea0| 00 00 00 00 4c 00 00 00 | 01 14 02 00 00 00 00 00 |....L...|........|
|00000eb0| c0 00 00 00 00 00 00 46 | 00 00 00 00 00 00 00 00 |.......F|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 01 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001000| 00 00 00 01 00 00 00 48 | 54 6f 70 20 3d 20 31 32 |.......H|Top = 12|
|00001010| 0d 0a 4c 65 66 74 20 3d | 20 31 32 0d 0a 48 65 69 |..Left =| 12..Hei|
|00001020| 67 68 74 20 3d 20 32 36 | 34 0d 0a 57 69 64 74 68 |ght = 26|4..Width|
|00001030| 20 3d 20 33 37 32 0d 0a | 4e 61 6d 65 20 3d 20 22 | = 372..|Name = "|
|00001040| 6f 6c 65 57 65 62 42 72 | 6f 77 73 65 72 22 0d 0a |oleWebBr|owser"..|
|00001050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001080| 00 00 00 01 00 00 00 08 | 5f 77 65 62 66 6f 72 6d |........|_webform|
|00001090| 2e 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010c0| 00 00 00 01 00 00 00 0d | 6f 6c 65 57 65 62 42 72 |........|oleWebBr|
|000010d0| 6f 77 73 65 72 00 00 00 | 00 00 00 00 00 00 00 00 |owser...|........|
|000010e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 00 01 00 00 00 0a | 6f 6c 65 63 6f 6e 74 72 |........|olecontr|
|00001110| 6f 6c 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ol......|........|
|00001120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 01 00 00 00 0c | 5f 77 65 62 76 69 65 77 |........|_webview|
|00001150| 2e 76 63 78 00 00 00 00 | 00 00 00 00 00 00 00 00 |.vcx....|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 00 01 00 00 00 0c | 5f 77 65 62 62 72 6f 77 |........|_webbrow|
|00001190| 73 65 72 34 00 00 00 00 | 00 00 00 00 00 00 00 00 |ser4....|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 01 00 00 01 60 | fe f2 ff 20 02 01 00 00 |.......`|... ....|
|000011d0| 00 47 01 00 00 47 01 00 | 00 00 00 00 00 00 00 00 |.G...G..|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 d2 |........|........|
|000011f0| 91 02 00 00 00 25 00 00 | 00 c0 00 00 00 00 00 00 |.....%..|........|
|00001200| 00 ee 00 00 00 08 00 00 | 00 de 00 00 00 00 00 00 |........|........|
|00001210| 00 00 00 00 00 fc 03 00 | 03 00 55 00 00 32 00 07 |........|..U..2..|
|00001220| 00 af f7 00 00 fe 10 00 | 25 fc 43 f7 00 00 a1 0a |........|%.C.....|
|00001230| fd f9 05 2b 00 fe 14 00 | 99 fc 43 00 f7 00 00 f4 |...+....|..C.....|
|00001240| 01 00 f4 02 00 f6 03 00 | fd fe 04 00 1e fe 03 00 |........|........|
|00001250| 55 04 00 04 00 43 55 52 | 4c 04 00 54 48 49 53 0d |U....CUR|L..THIS.|
|00001260| 00 4f 4c 45 57 45 42 42 | 52 4f 57 53 45 52 08 00 |.OLEWEBB|ROWSER..|
|00001270| 4e 41 56 49 47 41 54 45 | 13 00 10 00 99 fc 43 f4 |NAVIGATE|......C.|
|00001280| 00 00 f4 01 00 f6 02 00 | fd fe 03 00 55 03 00 04 |........|....U...|
|00001290| 00 54 48 49 53 0a 00 5f | 52 45 53 49 5a 41 42 4c |.THIS.._|RESIZABL|
|000012a0| 45 0e 00 41 44 4a 55 53 | 54 43 4f 4e 54 52 4f 4c |E..ADJUS|TCONTROL|
|000012b0| 53 04 00 49 6e 69 74 2c | 00 00 00 00 00 ff ff 06 |S..Init,|........|
|000012c0| 00 52 65 73 69 7a 65 87 | 00 00 00 00 00 ff ff 31 |.Resize.|.......1|
|000012d0| 00 71 00 01 01 41 01 41 | 00 32 00 01 01 31 00 00 |.q...A.A|.2...1..|
|000012e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000012f0| 00 00 00 10 00 00 00 5b | 00 00 00 01 00 00 00 06 |.......[|........|
|00001300| 00 00 00 78 00 00 00 98 | 00 00 00 07 00 00 00 00 |...x....|........|
|00001310| 29 00 00 00 47 01 00 00 | 00 00 00 00 00 00 00 00 |)...G...|........|
|00001320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 01 00 00 00 a3 | 50 52 4f 43 45 44 55 52 |........|PROCEDUR|
|00001350| 45 20 49 6e 69 74 0d 0a | 4c 50 41 52 41 4d 45 54 |E Init..|LPARAMET|
|00001360| 45 52 20 63 55 52 4c 0d | 0a 49 46 20 21 45 4d 50 |ER cURL.|.IF !EMP|
|00001370| 54 59 28 63 55 52 4c 29 | 0d 0a 09 54 48 49 53 2e |TY(cURL)|...THIS.|
|00001380| 6f 6c 65 77 65 62 62 72 | 6f 77 73 65 72 2e 6e 61 |olewebbr|owser.na|
|00001390| 76 69 67 61 74 65 28 63 | 55 52 4c 29 0d 0a 45 4e |vigate(c|URL)..EN|
|000013a0| 44 49 46 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 50 52 |DIF..END|PROC..PR|
|000013b0| 4f 43 45 44 55 52 45 20 | 52 65 73 69 7a 65 0d 0a |OCEDURE |Resize..|
|000013c0| 54 48 49 53 2e 5f 72 65 | 73 69 7a 61 62 6c 65 2e |THIS._re|sizable.|
|000013d0| 61 64 6a 75 73 74 63 6f | 6e 74 72 6f 6c 73 28 29 |adjustco|ntrols()|
|000013e0| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 00 00 00 00 00 |..ENDPRO|C.......|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001400| 00 00 00 01 00 00 00 67 | 54 6f 70 20 3d 20 30 0d |.......g|Top = 0.|
|00001410| 0a 4c 65 66 74 20 3d 20 | 30 0d 0a 48 65 69 67 68 |.Left = |0..Heigh|
|00001420| 74 20 3d 20 32 38 39 0d | 0a 57 69 64 74 68 20 3d |t = 289.|.Width =|
|00001430| 20 33 39 38 0d 0a 44 6f | 43 72 65 61 74 65 20 3d | 398..Do|Create =|
|00001440| 20 2e 54 2e 0d 0a 43 61 | 70 74 69 6f 6e 20 3d 20 | .T...Ca|ption = |
|00001450| 22 57 65 62 20 46 6f 72 | 6d 22 0d 0a 4e 61 6d 65 |"Web For|m"..Name|
|00001460| 20 3d 20 22 5f 77 65 62 | 66 6f 72 6d 22 0d 0a 00 | = "_web|form"...|
|00001470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001480| 00 00 00 01 00 00 00 04 | 66 6f 72 6d 65 6e 30 33 |........|formen03|
|00001490| 2e 69 63 6f 2c 2c 2c 2c | 31 39 39 37 2d 31 30 2d |.ico,,,,|1997-10-|
|000014a0| 30 37 2c 2c 2c 4f 4c 44 | 45 52 2c 2c 2c 2c 2c 2c |07,,,OLD|ER,,,,,,|
|000014b0| 2c 31 30 37 38 2c 2c 2c | 2c 2c 0d 0a 22 70 65 6e |,1078,,,|,,.."pen|
|000014c0| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|000014d0| 3d 20 20 20 33 2e 30 30 | 4c 4c 54 52 49 4d 28 53 |=   3.00|LLTRIM(S|
|000014e0| 55 42 53 54 52 28 6c 63 | 46 69 6c 65 4e 61 6d 65 |UBSTR(lc|FileName|
|000014f0| 2c 32 29 29 0d 0a 45 4e | 44 44 4f 0d 0a 44 4f 20 |,2))..EN|DDO..DO |
|00001500| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001510| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001540| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001550| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001580| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001590| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000015a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015c0| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|000015d0| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000015e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001600| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001610| 3d 20 20 20 33 2e 30 30 | 64 74 68 20 3d 20 31 30 |=   3.00|dth = 10|
|00001620| 30 0d 0a 54 61 62 53 74 | 6f 70 20 3d 20 2e 46 2e |0..TabSt|op = .F.|
|00001630| 0d 0a 63 73 6f 75 72 63 | 65 68 74 6d 6c 20 3d 20 |..csourc|ehtml = |
|00001640| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001650| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001680| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001690| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000016a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016c0| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|000016d0| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000016e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001700| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001710| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001740| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001750| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001780| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001790| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000017a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017c0| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|000017d0| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000017e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001800| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001810| 3d 20 20 20 33 2e 30 30 | 64 74 68 20 3d 20 31 30 |=   3.00|dth = 10|
|00001820| 30 0d 0a 54 61 62 53 74 | 6f 70 20 3d 20 2e 46 2e |0..TabSt|op = .F.|
|00001830| 0d 0a 63 73 6f 75 72 63 | 65 68 74 6d 6c 20 3d 20 |..csourc|ehtml = |
|00001840| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001850| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001880| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001890| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000018a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018c0| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|000018d0| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000018e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001900| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001910| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001940| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001950| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|00001960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001980| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00001990| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000019a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019c0| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|000019d0| 3d 20 20 20 33 2e 30 30 | 00 00 00 00 00 00 00 00 |=   3.00|........|
|000019e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a00| 00 00 00 01 00 00 00 0a | 6f 6c 65 63 6f 6e 74 72 |........|olecontr|
|00001a10| 6f 6c 72 33 0d 0a 57 69 | 64 74 68 20 3d 20 31 30 |olr3..Wi|dth = 10|
|00001a20| 30 0d 0a 54 61 62 53 74 | 6f 70 20 3d 20 2e 46 2e |0..TabSt|op = .F.|
|00001a30| 0d 0a 63 73 6f 75 72 63 | 65 68 74 6d 6c 20 3d 20 |..csourc|ehtml = |
|00001a40| 00 00 00 01 00 00 00 0a | 6f 6c 65 63 6f 6e 74 72 |........|olecontr|
|00001a50| 6f 6c 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ol......|........|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a80| 00 00 00 01 00 00 00 0c | 5f 77 65 62 62 72 6f 77 |........|_webbrow|
|00001a90| 73 65 72 33 00 00 00 00 | 00 00 00 00 00 00 00 00 |ser3....|........|
|00001aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ac0| 00 00 00 01 00 00 02 d8 | 48 65 69 67 68 74 20 3d |........|Height =|
|00001ad0| 20 31 30 30 0d 0a 57 69 | 64 74 68 20 3d 20 31 30 | 100..Wi|dth = 10|
|00001ae0| 30 0d 0a 54 61 62 53 74 | 6f 70 20 3d 20 2e 46 2e |0..TabSt|op = .F.|
|00001af0| 0d 0a 63 73 6f 75 72 63 | 65 68 74 6d 6c 20 3d 20 |..csourc|ehtml = |
|00001b00| 0d 0a 63 73 6f 75 72 63 | 65 66 69 6c 65 20 3d 20 |..csourc|efile = |
|00001b10| 0d 0a 63 75 72 6c 20 3d | 20 0d 0a 63 6c 61 73 74 |..curl =| ..clast|
|00001b20| 75 72 6c 20 3d 20 0d 0a | 63 62 65 66 6f 72 65 75 |url = ..|cbeforeu|
|00001b30| 72 6c 20 3d 20 0d 0a 63 | 74 65 6d 70 66 69 6c 65 |rl = ..c|tempfile|
|00001b40| 6e 61 6d 65 20 3d 20 0d | 0a 6f 68 6f 73 74 20 3d |name = .|.ohost =|
|00001b50| 20 2e 4e 55 4c 4c 2e 0d | 0a 75 76 61 6c 75 65 20 | .NULL..|.uvalue |
|00001b60| 3d 20 2e 54 2e 0d 0a 63 | 6e 65 77 75 72 6c 20 3d |= .T...c|newurl =|
|00001b70| 20 0d 0a 63 73 6f 75 72 | 63 65 75 72 6c 20 3d 20 | ..csour|ceurl = |
|00001b80| 0d 0a 63 73 6f 75 72 63 | 65 66 69 6c 65 6e 61 6d |..csourc|efilenam|
|00001b90| 65 20 3d 20 0d 0a 63 76 | 66 70 73 63 72 69 70 74 |e = ..cv|fpscript|
|00001ba0| 74 61 62 6c 65 20 3d 20 | 0d 0a 63 76 66 70 73 63 |table = |..cvfpsc|
|00001bb0| 72 69 70 74 20 3d 20 0d | 0a 63 73 6f 75 72 63 65 |ript = .|.csource|
|00001bc0| 66 69 6c 65 70 61 74 68 | 20 3d 20 0d 0a 63 70 61 |filepath| = ..cpa|
|00001bd0| 72 73 65 66 69 6c 65 65 | 78 74 20 3d 20 68 74 6d |rsefilee|xt = htm|
|00001be0| 3b 68 74 6d 6c 3b 61 73 | 70 0d 0a 6e 73 63 72 69 |;html;as|p..nscri|
|00001bf0| 70 74 63 6f 75 6e 74 20 | 3d 20 30 0d 0a 6f 73 6f |ptcount |= 0..oso|
|00001c00| 75 72 63 65 20 3d 20 2e | 4e 55 4c 4c 2e 0d 0a 75 |urce = .|NULL...u|
|00001c10| 72 65 73 75 6c 74 20 3d | 20 2e 54 2e 0d 0a 6f 61 |result =| .T...oa|
|00001c20| 63 74 69 6f 6e 20 3d 20 | 2e 4e 55 4c 4c 2e 0d 0a |ction = |.NULL...|
|00001c30| 63 76 66 70 73 70 72 6f | 74 6f 63 6f 6c 20 3d 20 |cvfpspro|tocol = |
|00001c40| 76 66 70 73 3a 0d 0a 63 | 74 65 6d 70 66 69 6c 65 |vfps:..c|tempfile|
|00001c50| 70 72 65 66 69 78 20 3d | 20 5f 74 65 6d 70 0d 0a |prefix =| _temp..|
|00001c60| 75 72 65 74 75 72 6e 20 | 3d 20 2e 54 2e 0d 0a 63 |ureturn |= .T...c|
|00001c70| 62 6c 61 6e 6b 68 74 6d | 6c 66 69 6c 65 20 3d 20 |blankhtm|lfile = |
|00001c80| 42 6c 61 6e 6b 2e 68 74 | 6d 0d 0a 63 70 72 6f 67 |Blank.ht|m..cprog|
|00001c90| 72 61 6d 70 61 74 68 20 | 3d 20 0d 0a 63 70 61 72 |rampath |= ..cpar|
|00001ca0| 61 6d 20 3d 20 0d 0a 63 | 66 69 6c 65 6e 61 6d 65 |am = ..c|filename|
|00001cb0| 20 3d 20 0d 0a 63 61 6c | 69 61 73 20 3d 20 0d 0a | = ..cal|ias = ..|
|00001cc0| 63 70 61 72 61 6d 64 65 | 6c 69 6d 69 74 65 72 20 |cparamde|limiter |
|00001cd0| 3d 20 26 0d 0a 63 66 69 | 6c 65 70 61 74 68 20 3d |= &..cfi|lepath =|
|00001ce0| 20 0d 0a 6e 72 65 63 6e | 6f 20 3d 20 30 0d 0a 6e | ..nrecn|o = 0..n|
|00001cf0| 64 61 74 61 73 65 73 73 | 69 6f 6e 69 64 20 3d 20 |datasess|ionid = |
|00001d00| 30 0d 0a 63 64 62 66 20 | 3d 20 0d 0a 6f 75 73 65 |0..cdbf |= ..ouse|
|00001d10| 72 20 3d 20 2e 4e 55 4c | 4c 2e 0d 0a 6e 68 69 73 |r = .NUL|L...nhis|
|00001d20| 74 6f 72 79 63 6f 75 6e | 74 20 3d 20 30 0d 0a 63 |torycoun|t = 0..c|
|00001d30| 76 65 72 73 69 6f 6e 20 | 3d 20 57 65 62 20 42 72 |version |= Web Br|
|00001d40| 6f 77 73 65 72 20 30 33 | 2e 30 31 2e 30 30 30 37 |owser 03|.01.0007|
|00001d50| 0d 0a 63 64 62 66 70 61 | 74 68 20 3d 20 0d 0a 6e |..cdbfpa|th = ..n|
|00001d60| 75 73 65 72 6c 65 76 65 | 6c 20 3d 20 30 0d 0a 63 |userleve|l = 0..c|
|00001d70| 75 73 65 72 69 64 20 3d | 20 0d 0a 63 75 73 65 72 |userid =| ..cuser|
|00001d80| 6e 61 6d 65 20 3d 20 0d | 0a 4e 61 6d 65 20 3d 20 |name = .|.Name = |
|00001d90| 22 5f 77 65 62 62 72 6f | 77 73 65 72 33 22 0d 0a |"_webbro|wser3"..|
|00001da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001dc0| 00 00 00 01 00 00 91 45 | 50 52 4f 43 45 44 55 52 |.......E|PROCEDUR|
|00001dd0| 45 20 72 65 66 72 65 73 | 68 73 6f 75 72 63 65 0d |E refres|hsource.|
|00001de0| 0a 4c 4f 43 41 4c 20 6c | 63 46 69 6c 65 4e 61 6d |.LOCAL l|cFileNam|
|00001df0| 65 2c 6c 63 46 69 6c 65 | 4e 61 6d 65 32 2c 6c 6e |e,lcFile|Name2,ln|
|00001e00| 4c 61 73 74 53 65 6c 65 | 63 74 2c 6c 63 53 6f 75 |LastSele|ct,lcSou|
|00001e10| 72 63 65 2c 6c 63 41 6c | 69 61 73 0d 0a 0d 0a 49 |rce,lcAl|ias....I|
|00001e20| 46 20 74 68 69 73 2e 6c | 52 65 6c 65 61 73 65 0d |F this.l|Release.|
|00001e30| 0a 09 52 45 54 55 52 4e | 20 2e 46 2e 0d 0a 45 4e |..RETURN| .F...EN|
|00001e40| 44 49 46 0d 0a 74 68 69 | 73 2e 63 53 6f 75 72 63 |DIF..thi|s.cSourc|
|00001e50| 65 46 69 6c 65 3d 22 22 | 0d 0a 74 68 69 73 2e 63 |eFile=""|..this.c|
|00001e60| 53 6f 75 72 63 65 48 54 | 4d 4c 3d 22 22 0d 0a 49 |SourceHT|ML=""..I|
|00001e70| 46 20 45 4d 50 54 59 28 | 74 68 69 73 2e 63 46 69 |F EMPTY(|this.cFi|
|00001e80| 6c 65 4e 61 6d 65 29 0d | 0a 09 52 45 54 55 52 4e |leName).|..RETURN|
|00001e90| 20 2e 46 2e 0d 0a 45 4e | 44 49 46 0d 0a 6c 63 46 | .F...EN|DIF..lcF|
|00001ea0| 69 6c 65 4e 61 6d 65 3d | 74 68 69 73 2e 63 46 69 |ileName=|this.cFi|
|00001eb0| 6c 65 4e 61 6d 65 0d 0a | 49 46 20 45 4d 50 54 59 |leName..|IF EMPTY|
|00001ec0| 28 53 59 53 28 32 30 30 | 30 2c 6c 63 46 69 6c 65 |(SYS(200|0,lcFile|
|00001ed0| 4e 61 6d 65 29 29 0d 0a | 09 52 45 54 55 52 4e 20 |Name))..|.RETURN |
|00001ee0| 2e 46 2e 0d 0a 45 4e 44 | 49 46 0d 0a 6c 63 46 69 |.F...END|IF..lcFi|
|00001ef0| 6c 65 4e 61 6d 65 32 3d | 74 68 69 73 2e 54 72 69 |leName2=|this.Tri|
|00001f00| 6d 50 61 74 68 28 6c 63 | 46 69 6c 65 4e 61 6d 65 |mPath(lc|FileName|
|00001f10| 29 0d 0a 49 46 20 57 45 | 58 49 53 54 28 6c 63 46 |)..IF WE|XIST(lcF|
|00001f20| 69 6c 65 4e 61 6d 65 32 | 29 0d 0a 09 52 45 4c 45 |ileName2|)...RELE|
|00001f30| 41 53 45 20 57 49 4e 44 | 4f 57 20 28 6c 63 46 69 |ASE WIND|OW (lcFi|
|00001f40| 6c 65 4e 61 6d 65 32 29 | 0d 0a 45 4e 44 49 46 0d |leName2)|..ENDIF.|
|00001f50| 0a 6c 6e 4c 61 73 74 53 | 65 6c 65 63 74 3d 53 45 |.lnLastS|elect=SE|
|00001f60| 4c 45 43 54 28 29 0d 0a | 6c 63 41 6c 69 61 73 3d |LECT()..|lcAlias=|
|00001f70| 4c 4f 57 45 52 28 53 59 | 53 28 32 30 31 35 29 29 |LOWER(SY|S(2015))|
|00001f80| 0d 0a 43 52 45 41 54 45 | 20 43 55 52 53 4f 52 20 |..CREATE| CURSOR |
|00001f90| 28 6c 63 41 6c 69 61 73 | 29 20 28 53 6f 75 72 63 |(lcAlias|) (Sourc|
|00001fa0| 65 20 4d 29 0d 0a 41 50 | 50 45 4e 44 20 42 4c 41 |e M)..AP|PEND BLA|
|00001fb0| 4e 4b 0d 0a 41 50 50 45 | 4e 44 20 4d 45 4d 4f 20 |NK..APPE|ND MEMO |
|00001fc0| 53 6f 75 72 63 65 20 46 | 52 4f 4d 20 28 6c 63 46 |Source F|ROM (lcF|
|00001fd0| 69 6c 65 4e 61 6d 65 29 | 20 4f 56 45 52 57 52 49 |ileName)| OVERWRI|
|00001fe0| 54 45 0d 0a 6c 63 53 6f | 75 72 63 65 3d 53 6f 75 |TE..lcSo|urce=Sou|
|00001ff0| 72 63 65 0d 0a 55 53 45 | 0d 0a 53 45 4c 45 43 54 |rce..USE|..SELECT|
|00002000| 20 28 6c 6e 4c 61 73 74 | 53 65 6c 65 63 74 29 0d | (lnLast|Select).|
|00002010| 0a 74 68 69 73 2e 63 53 | 6f 75 72 63 65 46 69 6c |.this.cS|ourceFil|
|00002020| 65 3d 6c 63 46 69 6c 65 | 4e 61 6d 65 0d 0a 74 68 |e=lcFile|Name..th|
|00002030| 69 73 2e 63 53 6f 75 72 | 63 65 48 54 4d 4c 3d 6c |is.cSour|ceHTML=l|
|00002040| 63 53 6f 75 72 63 65 0d | 0a 0d 0a 45 4e 44 50 52 |cSource.|...ENDPR|
|00002050| 4f 43 0d 0a 50 52 4f 43 | 45 44 55 52 45 20 76 69 |OC..PROC|EDURE vi|
|00002060| 65 77 73 6f 75 72 63 65 | 0d 0a 4c 50 41 52 41 4d |ewsource|..LPARAM|
|00002070| 45 54 45 52 53 20 74 6c | 4e 6f 57 61 69 74 2c 74 |ETERS tl|NoWait,t|
|00002080| 6c 4e 6f 45 64 69 74 0d | 0a 4c 4f 43 41 4c 20 6c |lNoEdit.|.LOCAL l|
|00002090| 63 46 69 6c 65 4e 61 6d | 65 0d 0a 0d 0a 23 44 45 |cFileNam|e....#DE|
|000020a0| 46 49 4e 45 20 48 54 4d | 4c 5f 53 4f 55 52 43 45 |FINE HTM|L_SOURCE|
|000020b0| 5f 4e 4f 54 5f 41 56 41 | 49 4c 41 42 4c 45 5f 4c |_NOT_AVA|ILABLE_L|
|000020c0| 4f 43 09 22 48 54 4d 4c | 20 73 6f 75 72 63 65 20 |OC."HTML| source |
|000020d0| 6e 6f 74 20 61 76 61 69 | 6c 61 62 6c 65 22 0d 0a |not avai|lable"..|
|000020e0| 0d 0a 49 46 20 74 68 69 | 73 2e 6c 52 65 6c 65 61 |..IF thi|s.lRelea|
|000020f0| 73 65 0d 0a 09 52 45 54 | 55 52 4e 20 2e 46 2e 0d |se...RET|URN .F..|
|00002100| 0a 45 4e 44 49 46 0d 0a | 74 68 69 73 2e 6c 56 69 |.ENDIF..|this.lVi|
|00002110| 65 77 53 6f 75 72 63 65 | 4d 6f 64 65 3d 2e 46 2e |ewSource|Mode=.F.|
|00002120| 0d 0a 74 68 69 73 2e 47 | 65 74 53 6f 75 72 63 65 |..this.G|etSource|
|00002130| 48 54 4d 4c 28 29 0d 0a | 6c 63 46 69 6c 65 4e 61 |HTML()..|lcFileNa|
|00002140| 6d 65 3d 74 68 69 73 2e | 47 65 74 53 6f 75 72 63 |me=this.|GetSourc|
|00002150| 65 46 69 6c 65 28 29 0d | 0a 49 46 20 45 4d 50 54 |eFile().|.IF EMPT|
|00002160| 59 28 6c 63 46 69 6c 65 | 4e 61 6d 65 29 20 4f 52 |Y(lcFile|Name) OR|
|00002170| 20 45 4d 50 54 59 28 53 | 59 53 28 32 30 30 30 2c | EMPTY(S|YS(2000,|
|00002180| 6c 63 46 69 6c 65 4e 61 | 6d 65 29 29 0d 0a 09 74 |lcFileNa|me))...t|
|00002190| 68 69 73 2e 57 61 69 74 | 57 69 6e 64 6f 77 28 48 |his.Wait|Window(H|
|000021a0| 54 4d 4c 5f 53 4f 55 52 | 43 45 5f 4e 4f 54 5f 41 |TML_SOUR|CE_NOT_A|
|000021b0| 56 41 49 4c 41 42 4c 45 | 5f 4c 4f 43 29 0d 0a 09 |VAILABLE|_LOC)...|
|000021c0| 52 45 54 55 52 4e 20 2e | 46 2e 0d 0a 45 4e 44 49 |RETURN .|F...ENDI|
|000021d0| 46 0d 0a 49 46 20 74 6c | 4e 6f 57 61 69 74 0d 0a |F..IF tl|NoWait..|
|000021e0| 09 49 46 20 74 6c 4e 6f | 45 64 69 74 0d 0a 09 09 |.IF tlNo|Edit....|
|000021f0| 4d 4f 44 49 46 59 20 46 | 49 4c 45 20 28 6c 63 46 |MODIFY F|ILE (lcF|
|00002200| 69 6c 65 4e 61 6d 65 29 | 20 4e 4f 45 44 49 54 20 |ileName)| NOEDIT |
|00002210| 4e 4f 57 41 49 54 0d 0a | 09 45 4c 53 45 0d 0a 09 |NOWAIT..|.ELSE...|
|00002220| 09 4d 4f 44 49 46 59 20 | 46 49 4c 45 20 28 6c 63 |.MODIFY |FILE (lc|
|00002230| 46 69 6c 65 4e 61 6d 65 | 29 20 4e 4f 57 41 49 54 |FileName|) NOWAIT|
|00002240| 0d 0a 09 45 4e 44 49 46 | 0d 0a 09 52 45 54 55 52 |...ENDIF|...RETUR|
|00002250| 4e 0d 0a 45 4e 44 49 46 | 0d 0a 74 68 69 73 2e 6c |N..ENDIF|..this.l|
|00002260| 56 69 65 77 53 6f 75 72 | 63 65 4d 6f 64 65 3d 2e |ViewSour|ceMode=.|
|00002270| 54 2e 0d 0a 49 46 20 74 | 6c 4e 6f 45 64 69 74 0d |T...IF t|lNoEdit.|
|00002280| 0a 09 4d 4f 44 49 46 59 | 20 46 49 4c 45 20 28 6c |..MODIFY| FILE (l|
|00002290| 63 46 69 6c 65 4e 61 6d | 65 29 20 4e 4f 45 44 49 |cFileNam|e) NOEDI|
|000022a0| 54 0d 0a 45 4c 53 45 0d | 0a 09 4d 4f 44 49 46 59 |T..ELSE.|..MODIFY|
|000022b0| 20 46 49 4c 45 20 28 6c | 63 46 69 6c 65 4e 61 6d | FILE (l|cFileNam|
|000022c0| 65 29 0d 0a 09 49 46 20 | 4c 41 53 54 4b 45 59 28 |e)...IF |LASTKEY(|
|000022d0| 29 23 32 37 0d 0a 09 09 | 74 68 69 73 2e 6c 48 69 |)#27....|this.lHi|
|000022e0| 73 74 6f 72 79 45 6e 61 | 62 6c 65 64 3d 2e 46 2e |storyEna|bled=.F.|
|000022f0| 0d 0a 09 09 74 68 69 73 | 2e 4e 61 76 69 67 61 74 |....this|.Navigat|
|00002300| 65 28 6c 63 46 69 6c 65 | 4e 61 6d 65 29 0d 0a 09 |e(lcFile|Name)...|
|00002310| 45 4e 44 49 46 0d 0a 45 | 4e 44 49 46 0d 0a 74 68 |ENDIF..E|NDIF..th|
|00002320| 69 73 2e 6c 56 69 65 77 | 53 6f 75 72 63 65 4d 6f |is.lView|SourceMo|
|00002330| 64 65 3d 2e 46 2e 0d 0a | 0d 0a 45 4e 44 50 52 4f |de=.F...|..ENDPRO|
|00002340| 43 0d 0a 50 52 4f 43 45 | 44 55 52 45 20 62 65 66 |C..PROCE|DURE bef|
|00002350| 6f 72 65 72 65 74 72 69 | 65 76 61 6c 0d 0a 50 41 |oreretri|eval..PA|
|00002360| 52 41 4d 45 54 45 52 53 | 20 75 72 6c 2c 20 66 6c |RAMETERS| url, fl|
|00002370| 61 67 73 2c 20 74 61 72 | 67 65 74 66 72 61 6d 65 |ags, tar|getframe|
|00002380| 6e 61 6d 65 2c 20 70 6f | 73 74 64 61 74 61 2c 20 |name, po|stdata, |
|00002390| 68 65 61 64 65 72 73 2c | 20 63 61 6e 63 65 6c 0d |headers,| cancel.|
|000023a0| 0a 4c 4f 43 41 4c 20 6c | 63 55 52 4c 2c 6c 63 4c |.LOCAL l|cURL,lcL|
|000023b0| 6f 77 65 72 55 52 4c 2c | 6c 63 4e 65 77 55 52 4c |owerURL,|lcNewURL|
|000023c0| 2c 6c 6e 41 74 50 6f 73 | 2c 6c 6e 4c 61 73 74 53 |,lnAtPos|,lnLastS|
|000023d0| 65 6c 65 63 74 0d 0a 0d | 0a 53 45 54 20 44 41 54 |elect...|.SET DAT|
|000023e0| 41 53 45 53 53 49 4f 4e | 20 54 4f 20 28 74 68 69 |ASESSION| TO (thi|
|000023f0| 73 2e 6f 48 6f 73 74 2e | 44 61 74 61 53 65 73 73 |s.oHost.|DataSess|
|00002400| 69 6f 6e 49 44 29 0d 0a | 6c 63 55 52 4c 3d 41 4c |ionID)..|lcURL=AL|
|00002410| 4c 54 52 49 4d 28 75 72 | 6c 29 0d 0a 74 68 69 73 |LTRIM(ur|l)..this|
|00002420| 2e 75 52 65 73 75 6c 74 | 3d 2e 54 2e 0d 0a 49 46 |.uResult|=.T...IF|
|00002430| 20 74 68 69 73 2e 6c 52 | 65 6c 65 61 73 65 20 4f | this.lR|elease O|
|00002440| 52 20 4e 4f 54 20 74 68 | 69 73 2e 45 6e 61 62 6c |R NOT th|is.Enabl|
|00002450| 65 64 0d 0a 09 63 61 6e | 63 65 6c 3d 2e 54 2e 0d |ed...can|cel=.T..|
|00002460| 0a 09 52 45 54 55 52 4e | 20 2e 46 2e 0d 0a 45 4e |..RETURN| .F...EN|
|00002470| 44 49 46 0d 0a 6c 6e 41 | 74 50 6f 73 3d 41 54 28 |DIF..lnA|tPos=AT(|
|00002480| 22 3f 22 2c 6c 63 55 52 | 4c 29 0d 0a 49 46 20 6c |"?",lcUR|L)..IF l|
|00002490| 6e 41 74 50 6f 73 3e 30 | 0d 0a 09 6c 63 55 52 4c |nAtPos>0|...lcURL|
|000024a0| 3d 41 4c 4c 54 52 49 4d | 28 4c 45 46 54 28 6c 63 |=ALLTRIM|(LEFT(lc|
|000024b0| 55 52 4c 2c 6c 6e 41 74 | 50 6f 73 2d 31 29 29 0d |URL,lnAt|Pos-1)).|
|000024c0| 0a 45 4e 44 49 46 0d 0a | 74 68 69 73 2e 63 4c 61 |.ENDIF..|this.cLa|
|000024d0| 73 74 55 52 4c 3d 74 68 | 69 73 2e 63 55 52 4c 0d |stURL=th|is.cURL.|
|000024e0| 0a 6c 63 4c 6f 77 65 72 | 55 52 4c 3d 4c 4f 57 45 |.lcLower|URL=LOWE|
|000024f0| 52 28 6c 63 55 52 4c 29 | 0d 0a 49 46 20 4c 4f 57 |R(lcURL)|..IF LOW|
|00002500| 45 52 28 4c 45 46 54 28 | 6c 63 4c 6f 77 65 72 55 |ER(LEFT(|lcLowerU|
|00002510| 52 4c 2c 4c 45 4e 28 74 | 68 69 73 2e 63 56 46 50 |RL,LEN(t|his.cVFP|
|00002520| 53 50 72 6f 74 6f 63 6f | 6c 29 29 29 3d 3d 4c 4f |SProtoco|l)))==LO|
|00002530| 57 45 52 28 74 68 69 73 | 2e 63 56 46 50 53 50 72 |WER(this|.cVFPSPr|
|00002540| 6f 74 6f 63 6f 6c 29 0d | 0a 09 63 61 6e 63 65 6c |otocol).|..cancel|
|00002550| 3d 2e 54 2e 0d 0a 09 74 | 68 69 73 2e 56 46 50 53 |=.T....t|his.VFPS|
|00002560| 28 6c 63 55 52 4c 29 0d | 0a 09 52 45 54 55 52 4e |(lcURL).|..RETURN|
|00002570| 20 2e 46 2e 0d 0a 45 4e | 44 49 46 0d 0a 6c 6e 4c | .F...EN|DIF..lnL|
|00002580| 61 73 74 53 65 6c 65 63 | 74 3d 53 45 4c 45 43 54 |astSelec|t=SELECT|
|00002590| 28 29 0d 0a 49 46 20 4e | 4f 54 20 74 68 69 73 2e |()..IF N|OT this.|
|000025a0| 6c 56 46 50 53 63 72 69 | 70 74 20 4f 52 20 4e 4f |lVFPScri|pt OR NO|
|000025b0| 54 20 74 68 69 73 2e 4f | 70 65 6e 56 46 50 53 63 |T this.O|penVFPSc|
|000025c0| 72 69 70 74 28 29 0d 0a | 09 49 46 20 55 53 45 44 |ript()..|.IF USED|
|000025d0| 28 22 76 66 70 73 63 72 | 69 70 74 22 29 0d 0a 09 |("vfpscr|ipt")...|
|000025e0| 09 55 53 45 20 49 4e 20 | 76 66 70 73 63 72 69 70 |.USE IN |vfpscrip|
|000025f0| 74 0d 0a 09 45 4e 44 49 | 46 0d 0a 09 53 45 4c 45 |t...ENDI|F...SELE|
|00002600| 43 54 20 28 6c 6e 4c 61 | 73 74 53 65 6c 65 63 74 |CT (lnLa|stSelect|
|00002610| 29 0d 0a 09 52 45 54 55 | 52 4e 0d 0a 45 4e 44 49 |)...RETU|RN..ENDI|
|00002620| 46 0d 0a 74 68 69 73 2e | 45 6e 61 62 6c 65 64 3d |F..this.|Enabled=|
|00002630| 2e 46 2e 0d 0a 53 45 4c | 45 43 54 20 76 66 70 73 |.F...SEL|ECT vfps|
|00002640| 63 72 69 70 74 0d 0a 53 | 43 41 4e 20 41 4c 4c 20 |cript..S|CAN ALL |
|00002650| 46 4f 52 20 42 65 66 6f | 72 65 4e 61 76 0d 0a 09 |FOR Befo|reNav...|
|00002660| 49 46 20 4e 4f 54 20 45 | 4d 50 54 59 28 55 52 4c |IF NOT E|MPTY(URL|
|00002670| 4d 61 74 63 68 29 20 41 | 4e 44 20 4e 4f 54 20 74 |Match) A|ND NOT t|
|00002680| 68 69 73 2e 57 69 6c 64 | 43 61 72 64 4d 61 74 63 |his.Wild|CardMatc|
|00002690| 68 28 41 4c 4c 54 52 49 | 4d 28 4d 4c 49 4e 45 28 |h(ALLTRI|M(MLINE(|
|000026a0| 55 52 4c 4d 61 74 63 68 | 2c 31 29 29 2c 6c 63 55 |URLMatch|,1)),lcU|
|000026b0| 52 4c 29 0d 0a 09 09 4c | 4f 4f 50 0d 0a 09 45 4e |RL)....L|OOP...EN|
|000026c0| 44 49 46 0d 0a 09 49 46 | 20 4e 4f 54 20 45 4d 50 |DIF...IF| NOT EMP|
|000026d0| 54 59 28 55 52 4c 45 76 | 61 6c 29 20 41 4e 44 20 |TY(URLEv|al) AND |
|000026e0| 28 54 59 50 45 28 55 52 | 4c 45 76 61 6c 29 23 22 |(TYPE(UR|LEval)#"|
|000026f0| 4c 22 20 4f 52 20 4e 4f | 54 20 45 56 41 4c 55 41 |L" OR NO|T EVALUA|
|00002700| 54 45 28 55 52 4c 45 76 | 61 6c 29 29 0d 0a 09 09 |TE(URLEv|al))....|
|00002710| 4c 4f 4f 50 0d 0a 09 45 | 4e 44 49 46 0d 0a 09 49 |LOOP...E|NDIF...I|
|00002720| 46 20 55 52 4c 43 61 6e | 63 65 6c 0d 0a 09 09 63 |F URLCan|cel....c|
|00002730| 61 6e 63 65 6c 3d 2e 54 | 2e 0d 0a 09 45 4e 44 49 |ancel=.T|....ENDI|
|00002740| 46 0d 0a 09 49 46 20 4e | 4f 54 20 45 4d 50 54 59 |F...IF N|OT EMPTY|
|00002750| 28 53 63 72 69 70 74 29 | 0d 0a 09 09 74 68 69 73 |(Script)|....this|
|00002760| 2e 52 75 6e 53 63 72 69 | 70 74 28 41 4c 4c 54 52 |.RunScri|pt(ALLTR|
|00002770| 49 4d 28 4e 61 6d 65 29 | 29 0d 0a 09 45 4e 44 49 |IM(Name)|)...ENDI|
|00002780| 46 0d 0a 09 49 46 20 4e | 4f 54 20 55 53 45 44 28 |F...IF N|OT USED(|
|00002790| 22 76 66 70 73 63 72 69 | 70 74 22 29 0d 0a 09 09 |"vfpscri|pt")....|
|000027a0| 45 58 49 54 0d 0a 09 45 | 4e 44 49 46 0d 0a 09 53 |EXIT...E|NDIF...S|
|000027b0| 45 4c 45 43 54 20 76 66 | 70 73 63 72 69 70 74 0d |ELECT vf|pscript.|
|000027c0| 0a 09 49 46 20 4e 4f 54 | 20 45 4d 50 54 59 28 55 |..IF NOT| EMPTY(U|
|000027d0| 52 4c 4a 75 6d 70 29 0d | 0a 09 09 6c 63 4e 65 77 |RLJump).|...lcNew|
|000027e0| 55 52 4c 3d 41 4c 4c 54 | 52 49 4d 28 55 52 4c 4a |URL=ALLT|RIM(URLJ|
|000027f0| 75 6d 70 29 0d 0a 09 09 | 74 68 69 73 2e 63 55 52 |ump)....|this.cUR|
|00002800| 4c 3d 4c 4f 57 45 52 28 | 74 68 69 73 2e 56 61 6c |L=LOWER(|this.Val|
|00002810| 69 64 55 52 4c 28 6c 63 | 4e 65 77 55 52 4c 29 29 |idURL(lc|NewURL))|
|00002820| 0d 0a 09 09 63 61 6e 63 | 65 6c 3d 2e 54 2e 0d 0a |....canc|el=.T...|
|00002830| 09 09 74 68 69 73 2e 4e | 61 76 69 67 61 74 65 28 |..this.N|avigate(|
|00002840| 6c 63 4e 65 77 55 52 4c | 2c 40 66 6c 61 67 73 2c |lcNewURL|,@flags,|
|00002850| 40 74 61 72 67 65 74 66 | 72 61 6d 65 6e 61 6d 65 |@targetf|ramename|
|00002860| 2c 40 70 6f 73 74 64 61 | 74 61 2c 40 68 65 61 64 |,@postda|ta,@head|
|00002870| 65 72 73 29 0d 0a 09 45 | 4e 44 49 46 0d 0a 09 49 |ers)...E|NDIF...I|
|00002880| 46 20 4e 4f 54 20 43 6f | 6e 74 69 6e 75 65 0d 0a |F NOT Co|ntinue..|
|00002890| 09 09 45 58 49 54 0d 0a | 09 45 4e 44 49 46 0d 0a |..EXIT..|.ENDIF..|
|000028a0| 45 4e 44 53 43 41 4e 0d | 0a 53 45 4c 45 43 54 20 |ENDSCAN.|.SELECT |
|000028b0| 28 6c 6e 4c 61 73 74 53 | 65 6c 65 63 74 29 0d 0a |(lnLastS|elect)..|
|000028c0| 74 68 69 73 2e 45 6e 61 | 62 6c 65 64 3d 2e 54 2e |this.Ena|bled=.T.|
|000028d0| 0d 0a 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 50 52 4f |....ENDP|ROC..PRO|
|000028e0| 43 45 44 55 52 45 20 74 | 72 69 6d 65 78 74 0d 0a |CEDURE t|rimext..|
|000028f0| 4c 50 41 52 41 4d 45 54 | 45 52 53 20 74 63 46 69 |LPARAMET|ERS tcFi|
|00002900| 6c 65 4e 61 6d 65 2c 74 | 6c 50 6c 61 74 66 6f 72 |leName,t|lPlatfor|
|00002910| 6d 54 79 70 65 0d 0a 4c | 4f 43 41 4c 20 6c 63 46 |mType..L|OCAL lcF|
|00002920| 69 6c 65 4e 61 6d 65 2c | 6c 6e 41 74 50 6f 73 2c |ileName,|lnAtPos,|
|00002930| 6c 6e 41 74 50 6f 73 32 | 0d 0a 0d 0a 6c 63 46 69 |lnAtPos2|....lcFi|
|00002940| 6c 65 4e 61 6d 65 3d 74 | 63 46 69 6c 65 4e 61 6d |leName=t|cFileNam|
|00002950| 65 0d 0a 6c 6e 41 74 50 | 6f 73 3d 52 41 54 28 22 |e..lnAtP|os=RAT("|
|00002960| 2e 22 2c 6c 63 46 69 6c | 65 4e 61 6d 65 29 0d 0a |.",lcFil|eName)..|
|00002970| 49 46 20 6c 6e 41 74 50 | 6f 73 3e 30 0d 0a 09 6c |IF lnAtP|os>0...l|
|00002980| 6e 41 74 50 6f 73 32 3d | 52 41 54 28 22 3a 22 2c |nAtPos2=|RAT(":",|
|00002990| 6c 63 46 69 6c 65 4e 61 | 6d 65 29 0d 0a 09 49 46 |lcFileNa|me)...IF|
|000029a0| 20 6c 6e 41 74 50 6f 73 | 3e 6c 6e 41 74 50 6f 73 | lnAtPos|>lnAtPos|
|000029b0| 32 0d 0a 09 09 6c 63 46 | 69 6c 65 4e 61 6d 65 3d |2....lcF|ileName=|
|000029c0| 4c 45 46 54 28 6c 63 46 | 69 6c 65 4e 61 6d 65 2c |LEFT(lcF|ileName,|
|000029d0| 6c 6e 41 74 50 6f 73 2d | 31 29 0d 0a 09 45 4e 44 |lnAtPos-|1)...END|
|000029e0| 49 46 0d 0a 45 4e 44 49 | 46 0d 0a 49 46 20 74 6c |IF..ENDI|F..IF tl|
|000029f0| 50 6c 61 74 66 6f 72 6d | 54 79 70 65 0d 0a 09 6c |Platform|Type...l|
|00002a00| 63 46 69 6c 65 4e 61 6d | 65 3d 49 49 46 28 5f 64 |cFileNam|e=IIF(_d|
|00002a10| 6f 73 20 4f 52 20 5f 75 | 6e 69 78 2c 55 50 50 45 |os OR _u|nix,UPPE|
|00002a20| 52 28 6c 63 46 69 6c 65 | 4e 61 6d 65 29 2c 4c 4f |R(lcFile|Name),LO|
|00002a30| 57 45 52 28 6c 63 46 69 | 6c 65 4e 61 6d 65 29 29 |WER(lcFi|leName))|
|00002a40| 0d 0a 45 4e 44 49 46 0d | 0a 52 45 54 55 52 4e 20 |..ENDIF.|.RETURN |
|00002a50| 41 4c 4c 54 52 49 4d 28 | 6c 63 46 69 6c 65 4e 61 |ALLTRIM(|lcFileNa|
|00002a60| 6d 65 29 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |me)....E|NDPROC..|
|00002a70| 50 52 4f 43 45 44 55 52 | 45 20 74 72 69 6d 70 61 |PROCEDUR|E trimpa|
|00002a80| 74 68 0d 0a 4c 50 41 52 | 41 4d 45 54 45 52 53 20 |th..LPAR|AMETERS |
|00002a90| 74 63 46 69 6c 65 4e 61 | 6d 65 2c 74 6c 54 72 69 |tcFileNa|me,tlTri|
|00002aa0| 6d 45 78 74 2c 74 6c 50 | 6c 61 74 66 6f 72 6d 54 |mExt,tlP|latformT|
|00002ab0| 79 70 65 0d 0a 4c 4f 43 | 41 4c 20 6c 63 46 69 6c |ype..LOC|AL lcFil|
|00002ac0| 65 4e 61 6d 65 2c 6c 6e | 41 74 50 6f 73 0d 0a 0d |eName,ln|AtPos...|
|00002ad0| 0a 49 46 20 45 4d 50 54 | 59 28 74 63 46 69 6c 65 |.IF EMPT|Y(tcFile|
|00002ae0| 4e 61 6d 65 29 0d 0a 09 | 52 45 54 55 52 4e 20 22 |Name)...|RETURN "|
|00002af0| 22 0d 0a 45 4e 44 49 46 | 0d 0a 6c 63 46 69 6c 65 |"..ENDIF|..lcFile|
|00002b00| 4e 61 6d 65 3d 74 63 46 | 69 6c 65 4e 61 6d 65 0d |Name=tcF|ileName.|
|00002b10| 0a 6c 6e 41 74 50 6f 73 | 3d 41 54 28 22 3a 22 2c |.lnAtPos|=AT(":",|
|00002b20| 6c 63 46 69 6c 65 4e 61 | 6d 65 29 0d 0a 49 46 20 |lcFileNa|me)..IF |
|00002b30| 6c 6e 41 74 50 6f 73 3e | 30 0d 0a 09 6c 63 46 69 |lnAtPos>|0...lcFi|
|00002b40| 6c 65 4e 61 6d 65 3d 53 | 55 42 53 54 52 28 6c 63 |leName=S|UBSTR(lc|
|00002b50| 46 69 6c 65 4e 61 6d 65 | 2c 6c 6e 41 74 50 6f 73 |FileName|,lnAtPos|
|00002b60| 2b 31 29 0d 0a 45 4e 44 | 49 46 0d 0a 49 46 20 74 |+1)..END|IF..IF t|
|00002b70| 6c 54 72 69 6d 45 78 74 | 0d 0a 09 6c 63 46 69 6c |lTrimExt|...lcFil|
|00002b80| 65 4e 61 6d 65 3d 74 68 | 69 73 2e 54 72 69 6d 45 |eName=th|is.TrimE|
|00002b90| 78 74 28 6c 63 46 69 6c | 65 4e 61 6d 65 29 0d 0a |xt(lcFil|eName)..|
|00002ba0| 45 4e 44 49 46 0d 0a 49 | 46 20 74 6c 50 6c 61 74 |ENDIF..I|F tlPlat|
|00002bb0| 66 6f 72 6d 54 79 70 65 | 0d 0a 09 6c 63 46 69 6c |formType|...lcFil|
|00002bc0| 65 4e 61 6d 65 3d 49 49 | 46 28 5f 64 6f 73 20 4f |eName=II|F(_dos O|
|00002bd0| 52 20 5f 75 6e 69 78 2c | 55 50 50 45 52 28 6c 63 |R _unix,|UPPER(lc|
|00002be0| 46 69 6c 65 4e 61 6d 65 | 29 2c 4c 4f 57 45 52 28 |FileName|),LOWER(|
|00002bf0| 6c 63 46 69 6c 65 4e 61 | 6d 65 29 29 0d 0a 45 4e |lcFileNa|me))..EN|
|00002c00| 44 49 46 0d 0a 6c 63 46 | 69 6c 65 4e 61 6d 65 3d |DIF..lcF|ileName=|
|00002c10| 41 4c 4c 54 52 49 4d 28 | 53 55 42 53 54 52 28 6c |ALLTRIM(|SUBSTR(l|
|00002c20| 63 46 69 6c 65 4e 61 6d | 65 2c 41 54 28 22 5c 22 |cFileNam|e,AT("\"|
|00002c30| 2c 6c 63 46 69 6c 65 4e | 61 6d 65 2c 3b 0d 0a 09 |,lcFileN|ame,;...|
|00002c40| 09 4d 41 58 28 4f 43 43 | 55 52 53 28 22 5c 22 2c |.MAX(OCC|URS("\",|
|00002c50| 6c 63 46 69 6c 65 4e 61 | 6d 65 29 2c 31 29 29 2b |lcFileNa|me),1))+|
|00002c60| 31 29 29 0d 0a 44 4f 20 | 57 48 49 4c 45 20 4c 45 |1))..DO |WHILE LE|
|00002c70| 46 54 28 6c 63 46 69 6c | 65 4e 61 6d 65 2c 31 29 |FT(lcFil|eName,1)|
|00002c80| 3d 3d 22 2e 22 0d 0a 09 | 6c 63 46 69 6c 65 4e 61 |=="."...|lcFileNa|
|00002c90| 6d 65 3d 41 4c 4c 54 52 | 49 4d 28 53 55 42 53 54 |me=ALLTR|IM(SUBST|
|00002ca0| 52 28 6c 63 46 69 6c 65 | 4e 61 6d 65 2c 32 29 29 |R(lcFile|Name,2))|
|00002cb0| 0d 0a 45 4e 44 44 4f 0d | 0a 44 4f 20 57 48 49 4c |..ENDDO.|.DO WHIL|
|00002cc0| 45 20 52 49 47 48 54 28 | 6c 63 46 69 6c 65 4e 61 |E RIGHT(|lcFileNa|
|00002cd0| 6d 65 2c 31 29 3d 3d 22 | 2e 22 0d 0a 09 6c 63 46 |me,1)=="|."...lcF|
|00002ce0| 69 6c 65 4e 61 6d 65 3d | 41 4c 4c 54 52 49 4d 28 |ileName=|ALLTRIM(|
|00002cf0| 4c 45 46 54 28 6c 63 46 | 69 6c 65 4e 61 6d 65 2c |LEFT(lcF|ileName,|
|00002d00| 4c 45 4e 28 6c 63 46 69 | 6c 65 4e 61 6d 65 29 2d |LEN(lcFi|leName)-|
|00002d10| 31 29 29 0d 0a 45 4e 44 | 44 4f 0d 0a 52 45 54 55 |1))..END|DO..RETU|
|00002d20| 52 4e 20 6c 63 46 69 6c | 65 4e 61 6d 65 0d 0a 0d |RN lcFil|eName...|
|00002d30| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|00002d40| 55 52 45 20 74 72 69 6d | 66 69 6c 65 0d 0a 4c 50 |URE trim|file..LP|
|00002d50| 41 52 41 4d 45 54 45 52 | 53 20 74 63 46 69 6c 65 |ARAMETER|S tcFile|
|00002d60| 4e 61 6d 65 2c 6c 50 6c | 61 74 54 79 70 65 0d 0a |Name,lPl|atType..|
|00002d70| 4c 4f 43 41 4c 20 6c 63 | 46 69 6c 65 4e 61 6d 65 |LOCAL lc|FileName|
|00002d80| 2c 6c 6e 41 74 50 6f 73 | 0d 0a 0d 0a 6c 6e 41 74 |,lnAtPos|....lnAt|
|00002d90| 50 6f 73 3d 52 41 54 28 | 22 5c 22 2c 74 63 46 69 |Pos=RAT(|"\",tcFi|
|00002da0| 6c 65 4e 61 6d 65 29 0d | 0a 6c 63 46 69 6c 65 4e |leName).|.lcFileN|
|00002db0| 61 6d 65 3d 41 4c 4c 54 | 52 49 4d 28 49 49 46 28 |ame=ALLT|RIM(IIF(|
|00002dc0| 6c 6e 41 74 50 6f 73 3d | 30 2c 74 63 46 69 6c 65 |lnAtPos=|0,tcFile|
|00002dd0| 4e 61 6d 65 2c 4c 45 46 | 54 28 74 63 46 69 6c 65 |Name,LEF|T(tcFile|
|00002de0| 4e 61 6d 65 2c 6c 6e 41 | 74 50 6f 73 29 29 29 0d |Name,lnA|tPos))).|
|00002df0| 0a 49 46 20 6c 50 6c 61 | 74 54 79 70 65 0d 0a 09 |.IF lPla|tType...|
|00002e00| 6c 63 46 69 6c 65 4e 61 | 6d 65 3d 49 49 46 28 5f |lcFileNa|me=IIF(_|
|00002e10| 64 6f 73 20 4f 52 20 5f | 75 6e 69 78 2c 55 50 50 |dos OR _|unix,UPP|
|00002e20| 45 52 28 6c 63 46 69 6c | 65 4e 61 6d 65 29 2c 4c |ER(lcFil|eName),L|
|00002e30| 4f 57 45 52 28 6c 63 46 | 69 6c 65 4e 61 6d 65 29 |OWER(lcF|ileName)|
|00002e40| 29 0d 0a 45 4e 44 49 46 | 0d 0a 52 45 54 55 52 4e |)..ENDIF|..RETURN|
|00002e50| 20 6c 63 46 69 6c 65 4e | 61 6d 65 0d 0a 0d 0a 45 | lcFileN|ame....E|
|00002e60| 4e 44 50 52 4f 43 0d 0a | 50 52 4f 43 45 44 55 52 |NDPROC..|PROCEDUR|
|00002e70| 45 20 65 72 61 73 65 74 | 65 6d 70 66 69 6c 65 0d |E eraset|empfile.|
|00002e80| 0a 49 46 20 4e 4f 54 20 | 45 4d 50 54 59 28 74 68 |.IF NOT |EMPTY(th|
|00002e90| 69 73 2e 63 54 65 6d 70 | 46 69 6c 65 4e 61 6d 65 |is.cTemp|FileName|
|00002ea0| 29 0d 0a 09 45 52 41 53 | 45 20 28 74 68 69 73 2e |)...ERAS|E (this.|
|00002eb0| 63 54 65 6d 70 46 69 6c | 65 4e 61 6d 65 29 0d 0a |cTempFil|eName)..|
|00002ec0| 09 74 68 69 73 2e 63 54 | 65 6d 70 46 69 6c 65 4e |.this.cT|empFileN|
|00002ed0| 61 6d 65 3d 22 22 0d 0a | 45 4e 44 49 46 0d 0a 0d |ame=""..|ENDIF...|
|00002ee0| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|00002ef0| 55 52 45 20 67 65 74 73 | 6f 75 72 63 65 66 69 6c |URE gets|ourcefil|
|00002f00| 65 0d 0a 49 46 20 74 68 | 69 73 2e 6c 52 65 6c 65 |e..IF th|is.lRele|
|00002f10| 61 73 65 0d 0a 09 52 45 | 54 55 52 4e 20 2e 46 2e |ase...RE|TURN .F.|
|00002f20| 0d 0a 45 4e 44 49 46 0d | 0a 49 46 20 45 4d 50 54 |..ENDIF.|.IF EMPT|
|00002f30| 59 28 74 68 69 73 2e 63 | 53 6f 75 72 63 65 46 69 |Y(this.c|SourceFi|
|00002f40| 6c 65 29 0d 0a 09 74 68 | 69 73 2e 52 65 66 72 65 |le)...th|is.Refre|
|00002f50| 73 68 53 6f 75 72 63 65 | 0d 0a 45 4e 44 49 46 0d |shSource|..ENDIF.|
|00002f60| 0a 52 45 54 55 52 4e 20 | 74 68 69 73 2e 63 53 6f |.RETURN |this.cSo|
|00002f70| 75 72 63 65 46 69 6c 65 | 0d 0a 0d 0a 45 4e 44 50 |urceFile|....ENDP|
|00002f80| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 67 |ROC..PRO|CEDURE g|
|00002f90| 65 74 73 6f 75 72 63 65 | 68 74 6d 6c 0d 0a 49 46 |etsource|html..IF|
|00002fa0| 20 74 68 69 73 2e 6c 52 | 65 6c 65 61 73 65 0d 0a | this.lR|elease..|
|00002fb0| 09 52 45 54 55 52 4e 20 | 2e 46 2e 0d 0a 45 4e 44 |.RETURN |.F...END|
|00002fc0| 49 46 0d 0a 49 46 20 45 | 4d 50 54 59 28 74 68 69 |IF..IF E|MPTY(thi|
|00002fd0| 73 2e 63 53 6f 75 72 63 | 65 48 54 4d 4c 29 0d 0a |s.cSourc|eHTML)..|
|00002fe0| 09 74 68 69 73 2e 52 65 | 66 72 65 73 68 53 6f 75 |.this.Re|freshSou|
|00002ff0| 72 63 65 0d 0a 45 4e 44 | 49 46 0d 0a 52 45 54 55 |rce..END|IF..RETU|
|00003000| 52 4e 20 74 68 69 73 2e | 63 53 6f 75 72 63 65 48 |RN this.|cSourceH|
|00003010| 54 4d 4c 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |TML....E|NDPROC..|
|00003020| 50 52 4f 43 45 44 55 52 | 45 20 70 61 72 73 65 73 |PROCEDUR|E parses|
|00003030| 6f 75 72 63 65 0d 0a 2a | 2a 2a 20 4f 4c 45 20 43 |ource..*|** OLE C|
|00003040| 6f 6e 74 72 6f 6c 20 45 | 76 65 6e 74 20 2a 2a 2a |ontrol E|vent ***|
|00003050| 0d 0a 50 41 52 41 4d 45 | 54 45 52 53 20 75 72 6c |..PARAME|TERS url|
|00003060| 2c 20 66 6c 61 67 73 2c | 20 74 61 72 67 65 74 66 |, flags,| targetf|
|00003070| 72 61 6d 65 6e 61 6d 65 | 2c 20 70 6f 73 74 64 61 |ramename|, postda|
|00003080| 74 61 2c 20 68 65 61 64 | 65 72 73 2c 20 63 61 6e |ta, head|ers, can|
|00003090| 63 65 6c 0d 0a 50 52 49 | 56 41 54 45 20 6f 54 48 |cel..PRI|VATE oTH|
|000030a0| 49 53 0d 0a 4c 4f 43 41 | 4c 20 6c 63 55 52 4c 2c |IS..LOCA|L lcURL,|
|000030b0| 6c 63 53 6f 75 72 63 65 | 2c 6c 63 4e 65 77 55 52 |lcSource|,lcNewUR|
|000030c0| 4c 2c 6c 63 46 69 6c 65 | 4e 61 6d 65 2c 6c 6e 41 |L,lcFile|Name,lnA|
|000030d0| 74 50 6f 73 2c 6c 6c 48 | 54 4d 4c 46 69 6c 65 2c |tPos,llH|TMLFile,|
|000030e0| 6c 6c 42 75 73 79 0d 0a | 0d 0a 49 46 20 74 68 69 |llBusy..|..IF thi|
|000030f0| 73 2e 6c 52 65 6c 65 61 | 73 65 20 4f 52 20 4e 4f |s.lRelea|se OR NO|
|00003100| 54 20 74 68 69 73 2e 6c | 50 61 72 73 65 53 6f 75 |T this.l|ParseSou|
|00003110| 72 63 65 20 4f 52 20 54 | 59 50 45 28 22 75 72 6c |rce OR T|YPE("url|
|00003120| 22 29 23 22 43 22 20 4f | 52 20 45 4d 50 54 59 28 |")#"C" O|R EMPTY(|
|00003130| 75 72 6c 29 0d 0a 09 52 | 45 54 55 52 4e 20 2e 46 |url)...R|ETURN .F|
|00003140| 2e 0d 0a 45 4e 44 49 46 | 0d 0a 6c 63 55 52 4c 3d |...ENDIF|..lcURL=|
|00003150| 41 4c 4c 54 52 49 4d 28 | 75 72 6c 29 0d 0a 6c 63 |ALLTRIM(|url)..lc|
|00003160| 46 69 6c 65 4e 61 6d 65 | 3d 53 54 52 54 52 41 4e |FileName|=STRTRAN|
|00003170| 28 6c 63 55 52 4c 2c 22 | 2f 22 2c 22 5c 22 29 0d |(lcURL,"|/","\").|
|00003180| 0a 6c 6e 41 74 50 6f 73 | 3d 52 41 54 28 22 5c 22 |.lnAtPos|=RAT("\"|
|00003190| 2c 6c 63 46 69 6c 65 4e | 61 6d 65 29 0d 0a 49 46 |,lcFileN|ame)..IF|
|000031a0| 20 6c 6e 41 74 50 6f 73 | 3e 30 20 41 4e 44 20 4c | lnAtPos|>0 AND L|
|000031b0| 4f 57 45 52 28 53 55 42 | 53 54 52 28 6c 63 46 69 |OWER(SUB|STR(lcFi|
|000031c0| 6c 65 4e 61 6d 65 2c 6c | 6e 41 74 50 6f 73 2b 31 |leName,l|nAtPos+1|
|000031d0| 2c 20 3b 0d 0a 09 09 4c | 45 4e 28 74 68 69 73 2e |, ;....L|EN(this.|
|000031e0| 63 54 65 6d 70 46 69 6c | 65 50 72 65 66 69 78 29 |cTempFil|ePrefix)|
|000031f0| 29 29 3d 3d 74 68 69 73 | 2e 63 54 65 6d 70 46 69 |))==this|.cTempFi|
|00003200| 6c 65 50 72 65 66 69 78 | 0d 0a 09 52 45 54 55 52 |lePrefix|...RETUR|
|00003210| 4e 20 2e 46 2e 0d 0a 45 | 4e 44 49 46 0d 0a 74 68 |N .F...E|NDIF..th|
|00003220| 69 73 2e 63 46 69 6c 65 | 4e 61 6d 65 3d 22 22 0d |is.cFile|Name="".|
|00003230| 0a 74 68 69 73 2e 63 46 | 69 6c 65 50 61 74 68 3d |.this.cF|ilePath=|
|00003240| 22 22 0d 0a 74 68 69 73 | 2e 63 53 6f 75 72 63 65 |""..this|.cSource|
|00003250| 55 52 4c 3d 22 22 0d 0a | 74 68 69 73 2e 63 53 6f |URL=""..|this.cSo|
|00003260| 75 72 63 65 46 69 6c 65 | 4e 61 6d 65 3d 22 22 0d |urceFile|Name="".|
|00003270| 0a 6c 6c 48 54 4d 4c 46 | 69 6c 65 3d 2e 46 2e 0d |.llHTMLF|ile=.F..|
|00003280| 0a 6c 6e 41 74 50 6f 73 | 3d 52 41 54 28 22 2e 22 |.lnAtPos|=RAT("."|
|00003290| 2c 6c 63 55 52 4c 29 0d | 0a 6c 6c 48 54 4d 4c 46 |,lcURL).|.llHTMLF|
|000032a0| 69 6c 65 3d 28 6c 6e 41 | 74 50 6f 73 3e 30 20 41 |ile=(lnA|tPos>0 A|
|000032b0| 4e 44 20 49 4e 4c 49 53 | 54 28 4c 4f 57 45 52 28 |ND INLIS|T(LOWER(|
|000032c0| 41 4c 4c 54 52 49 4d 28 | 53 55 42 53 54 52 28 6c |ALLTRIM(|SUBSTR(l|
|000032d0| 63 55 52 4c 2c 6c 6e 41 | 74 50 6f 73 2b 31 29 29 |cURL,lnA|tPos+1))|
|000032e0| 29 2c 20 3b 0d 0a 09 09 | 22 68 74 6d 22 2c 22 68 |), ;....|"htm","h|
|000032f0| 74 6d 6c 22 2c 22 61 73 | 70 22 29 29 0d 0a 49 46 |tml","as|p"))..IF|
|00003300| 20 4e 4f 54 20 6c 6c 48 | 54 4d 4c 46 69 6c 65 20 | NOT llH|TMLFile |
|00003310| 4f 52 20 4c 4f 57 45 52 | 28 6c 63 46 69 6c 65 4e |OR LOWER|(lcFileN|
|00003320| 61 6d 65 29 3d 3d 4c 4f | 57 45 52 28 74 68 69 73 |ame)==LO|WER(this|
|00003330| 2e 63 54 65 6d 70 46 69 | 6c 65 4e 61 6d 65 29 20 |.cTempFi|leName) |
|00003340| 4f 52 20 3b 0d 0a 09 09 | 4c 4f 57 45 52 28 41 4c |OR ;....|LOWER(AL|
|00003350| 4c 54 52 49 4d 28 6c 63 | 46 69 6c 65 4e 61 6d 65 |LTRIM(lc|FileName|
|00003360| 29 29 3d 3d 4c 4f 57 45 | 52 28 41 4c 4c 54 52 49 |))==LOWE|R(ALLTRI|
|00003370| 4d 28 74 68 69 73 2e 63 | 42 6c 61 6e 6b 48 54 4d |M(this.c|BlankHTM|
|00003380| 4c 46 69 6c 65 29 29 0d | 0a 09 74 68 69 73 2e 63 |LFile)).|..this.c|
|00003390| 46 69 6c 65 4e 61 6d 65 | 3d 6c 63 46 69 6c 65 4e |FileName|=lcFileN|
|000033a0| 61 6d 65 0d 0a 09 74 68 | 69 73 2e 63 46 69 6c 65 |ame...th|is.cFile|
|000033b0| 50 61 74 68 3d 74 68 69 | 73 2e 54 72 69 6d 46 69 |Path=thi|s.TrimFi|
|000033c0| 6c 65 28 74 68 69 73 2e | 63 46 69 6c 65 4e 61 6d |le(this.|cFileNam|
|000033d0| 65 29 0d 0a 09 52 45 54 | 55 52 4e 20 2e 46 2e 0d |e)...RET|URN .F..|
|000033e0| 0a 45 4e 44 49 46 0d 0a | 6c 6e 41 74 50 6f 73 3d |.ENDIF..|lnAtPos=|
|000033f0| 52 41 54 28 22 3a 22 2c | 6c 63 46 69 6c 65 4e 61 |RAT(":",|lcFileNa|
|00003400| 6d 65 29 0d 0a 49 46 20 | 6c 6e 41 74 50 6f 73 3d |me)..IF |lnAtPos=|
|00003410| 30 0d 0a 09 52 45 54 55 | 52 4e 20 2e 46 2e 0d 0a |0...RETU|RN .F...|
|00003420| 45 4e 44 49 46 0d 0a 49 | 46 20 6c 6e 41 74 50 6f |ENDIF..I|F lnAtPo|
|00003430| 73 3e 32 0d 0a 09 6c 63 | 46 69 6c 65 4e 61 6d 65 |s>2...lc|FileName|
|00003440| 3d 41 4c 4c 54 52 49 4d | 28 53 55 42 53 54 52 28 |=ALLTRIM|(SUBSTR(|
|00003450| 6c 63 46 69 6c 65 4e 61 | 6d 65 2c 6c 6e 41 74 50 |lcFileNa|me,lnAtP|
|00003460| 6f 73 2d 31 29 29 0d 0a | 45 4e 44 49 46 0d 0a 49 |os-1))..|ENDIF..I|
|00003470| 46 20 45 4d 50 54 59 28 | 53 59 53 28 32 30 30 30 |F EMPTY(|SYS(2000|
|00003480| 2c 6c 63 46 69 6c 65 4e | 61 6d 65 29 29 0d 0a 09 |,lcFileN|ame))...|
|00003490| 52 45 54 55 52 4e 20 2e | 46 2e 0d 0a 45 4e 44 49 |RETURN .|F...ENDI|
|000034a0| 46 0d 0a 49 46 20 74 68 | 69 73 2e 6c 44 65 62 75 |F..IF th|is.lDebu|
|000034b0| 67 0d 0a 09 41 43 54 49 | 56 41 54 45 20 53 43 52 |g...ACTI|VATE SCR|
|000034c0| 45 45 4e 0d 0a 09 3f 20 | 50 52 4f 47 52 41 4d 28 |EEN...? |PROGRAM(|
|000034d0| 29 0d 0a 09 3f 20 22 55 | 52 4c 3a 20 22 2b 6c 63 |)...? "U|RL: "+lc|
|000034e0| 55 52 4c 0d 0a 45 4e 44 | 49 46 0d 0a 6c 6c 42 75 |URL..END|IF..llBu|
|000034f0| 73 79 3d 74 68 69 73 2e | 6c 42 75 73 79 0d 0a 74 |sy=this.|lBusy..t|
|00003500| 68 69 73 2e 53 65 74 42 | 75 73 79 53 74 61 74 65 |his.SetB|usyState|
|00003510| 28 2e 54 2e 29 0d 0a 49 | 46 20 4e 4f 54 20 53 55 |(.T.)..I|F NOT SU|
|00003520| 42 53 54 52 28 6c 63 55 | 52 4c 2c 35 2c 31 29 3d |BSTR(lcU|RL,5,1)=|
|00003530| 3d 22 3a 22 0d 0a 09 6c | 63 55 52 4c 3d 22 66 69 |=":"...l|cURL="fi|
|00003540| 6c 65 3a 2f 2f 22 2b 6c | 63 55 52 4c 0d 0a 45 4e |le://"+l|cURL..EN|
|00003550| 44 49 46 0d 0a 6c 63 4e | 65 77 55 52 4c 3d 22 22 |DIF..lcN|ewURL=""|
|00003560| 0d 0a 6f 54 48 49 53 3d | 74 68 69 73 0d 0a 74 68 |..oTHIS=|this..th|
|00003570| 69 73 2e 63 53 6f 75 72 | 63 65 55 52 4c 3d 6c 63 |is.cSour|ceURL=lc|
|00003580| 55 52 4c 0d 0a 74 68 69 | 73 2e 63 46 69 6c 65 4e |URL..thi|s.cFileN|
|00003590| 61 6d 65 3d 4c 4f 57 45 | 52 28 6c 63 46 69 6c 65 |ame=LOWE|R(lcFile|
|000035a0| 4e 61 6d 65 29 0d 0a 74 | 68 69 73 2e 63 46 69 6c |Name)..t|his.cFil|
|000035b0| 65 50 61 74 68 3d 74 68 | 69 73 2e 54 72 69 6d 46 |ePath=th|is.TrimF|
|000035c0| 69 6c 65 28 74 68 69 73 | 2e 63 46 69 6c 65 4e 61 |ile(this|.cFileNa|
|000035d0| 6d 65 29 0d 0a 74 68 69 | 73 2e 63 53 6f 75 72 63 |me)..thi|s.cSourc|
|000035e0| 65 46 69 6c 65 4e 61 6d | 65 3d 74 68 69 73 2e 63 |eFileNam|e=this.c|
|000035f0| 46 69 6c 65 4e 61 6d 65 | 0d 0a 74 68 69 73 2e 63 |FileName|..this.c|
|00003600| 53 6f 75 72 63 65 46 69 | 6c 65 50 61 74 68 3d 74 |SourceFi|lePath=t|
|00003610| 68 69 73 2e 54 72 69 6d | 46 69 6c 65 28 74 68 69 |his.Trim|File(thi|
|00003620| 73 2e 63 46 69 6c 65 4e | 61 6d 65 29 0d 0a 49 46 |s.cFileN|ame)..IF|
|00003630| 20 56 46 50 53 63 72 70 | 74 28 74 68 69 73 29 0d | VFPScrp|t(this).|
|00003640| 0a 09 6c 63 4e 65 77 55 | 52 4c 3d 74 68 69 73 2e |..lcNewU|RL=this.|
|00003650| 63 54 65 6d 70 46 69 6c | 65 4e 61 6d 65 0d 0a 45 |cTempFil|eName..E|
|00003660| 4c 53 45 0d 0a 09 74 68 | 69 73 2e 63 53 6f 75 72 |LSE...th|is.cSour|
|00003670| 63 65 55 52 4c 3d 22 22 | 0d 0a 09 74 68 69 73 2e |ceURL=""|...this.|
|00003680| 63 53 6f 75 72 63 65 46 | 69 6c 65 4e 61 6d 65 3d |cSourceF|ileName=|
|00003690| 22 22 0d 0a 09 74 68 69 | 73 2e 63 53 6f 75 72 63 |""...thi|s.cSourc|
|000036a0| 65 46 69 6c 65 50 61 74 | 68 3d 22 22 0d 0a 45 4e |eFilePat|h=""..EN|
|000036b0| 44 49 46 0d 0a 6f 54 48 | 49 53 3d 2e 4e 55 4c 4c |DIF..oTH|IS=.NULL|
|000036c0| 2e 0d 0a 74 68 69 73 2e | 53 65 74 42 75 73 79 53 |...this.|SetBusyS|
|000036d0| 74 61 74 65 28 6c 6c 42 | 75 73 79 29 0d 0a 49 46 |tate(llB|usy)..IF|
|000036e0| 20 54 59 50 45 28 22 74 | 68 69 73 2e 6f 48 6f 73 | TYPE("t|his.oHos|
|000036f0| 74 2e 6c 52 65 6c 65 61 | 73 65 22 29 3d 3d 22 4c |t.lRelea|se")=="L|
|00003700| 22 20 41 4e 44 20 74 68 | 69 73 2e 6f 48 6f 73 74 |" AND th|is.oHost|
|00003710| 2e 6c 52 65 6c 65 61 73 | 65 0d 0a 09 74 68 69 73 |.lReleas|e...this|
|00003720| 2e 56 69 73 69 62 6c 65 | 3d 2e 46 2e 0d 0a 09 52 |.Visible|=.F....R|
|00003730| 45 54 55 52 4e 20 2e 46 | 2e 0d 0a 45 4e 44 49 46 |ETURN .F|...ENDIF|
|00003740| 0d 0a 74 68 69 73 2e 63 | 55 52 4c 3d 4c 4f 57 45 |..this.c|URL=LOWE|
|00003750| 52 28 74 68 69 73 2e 56 | 61 6c 69 64 55 52 4c 28 |R(this.V|alidURL(|
|00003760| 6c 63 55 52 4c 29 29 0d | 0a 74 68 69 73 2e 63 4e |lcURL)).|.this.cN|
|00003770| 65 77 55 52 4c 3d 6c 63 | 4e 65 77 55 52 4c 0d 0a |ewURL=lc|NewURL..|
|00003780| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 50 52 4f 43 45 |..ENDPRO|C..PROCE|
|00003790| 44 55 52 45 20 72 75 6e | 63 6f 64 65 0d 0a 4c 50 |DURE run|code..LP|
|000037a0| 41 52 41 4d 45 54 45 52 | 53 20 74 63 43 6f 64 65 |ARAMETER|S tcCode|
|000037b0| 0d 0a 50 52 49 56 41 54 | 45 20 6f 54 48 49 53 0d |..PRIVAT|E oTHIS.|
|000037c0| 0a 4c 4f 43 41 4c 20 6c | 6e 44 61 74 61 53 65 73 |.LOCAL l|nDataSes|
|000037d0| 73 69 6f 6e 49 44 2c 6c | 6e 4c 61 73 74 53 65 6c |sionID,l|nLastSel|
|000037e0| 65 63 74 2c 6c 6c 42 75 | 73 79 0d 0a 0d 0a 49 46 |ect,llBu|sy....IF|
|000037f0| 20 74 68 69 73 2e 6c 52 | 65 6c 65 61 73 65 20 4f | this.lR|elease O|
|00003800| 52 20 45 4d 50 54 59 28 | 74 63 43 6f 64 65 29 20 |R EMPTY(|tcCode) |
|00003810| 4f 52 20 54 59 50 45 28 | 22 74 63 43 6f 64 65 22 |OR TYPE(|"tcCode"|
|00003820| 29 23 22 43 22 20 4f 52 | 20 49 53 4e 55 4c 4c 28 |)#"C" OR| ISNULL(|
|00003830| 74 63 43 6f 64 65 29 0d | 0a 09 52 45 54 55 52 4e |tcCode).|..RETURN|
|00003840| 20 2e 46 2e 0d 0a 45 4e | 44 49 46 0d 0a 49 46 20 | .F...EN|DIF..IF |
|00003850| 74 68 69 73 2e 6c 44 65 | 62 75 67 0d 0a 09 41 43 |this.lDe|bug...AC|
|00003860| 54 49 56 41 54 45 20 53 | 43 52 45 45 4e 0d 0a 09 |TIVATE S|CREEN...|
|00003870| 3f 20 50 52 4f 47 52 41 | 4d 28 29 0d 0a 45 4e 44 |? PROGRA|M()..END|
|00003880| 49 46 0d 0a 6c 6c 42 75 | 73 79 3d 74 68 69 73 2e |IF..llBu|sy=this.|
|00003890| 6c 42 75 73 79 0d 0a 74 | 68 69 73 2e 53 65 74 42 |lBusy..t|his.SetB|
|000038a0| 75 73 79 53 74 61 74 65 | 28 2e 54 2e 29 0d 0a 6c |usyState|(.T.)..l|
|000038b0| 6e 4c 61 73 74 53 65 6c | 65 63 74 3d 53 45 4c 45 |nLastSel|ect=SELE|
|000038c0| 43 54 28 29 0d 0a 6c 6e | 44 61 74 61 53 65 73 73 |CT()..ln|DataSess|
|000038d0| 69 6f 6e 49 44 3d 74 68 | 69 73 2e 6f 48 6f 73 74 |ionID=th|is.oHost|
|000038e0| 2e 44 61 74 61 53 65 73 | 73 69 6f 6e 49 44 0d 0a |.DataSes|sionID..|
|000038f0| 53 45 54 20 44 41 54 41 | 53 45 53 53 49 4f 4e 20 |SET DATA|SESSION |
|00003900| 54 4f 20 28 6c 6e 44 61 | 74 61 53 65 73 73 69 6f |TO (lnDa|taSessio|
|00003910| 6e 49 44 29 0d 0a 41 43 | 54 49 56 41 54 45 20 53 |nID)..AC|TIVATE S|
|00003920| 43 52 45 45 4e 0d 0a 6f | 54 48 49 53 3d 74 68 69 |CREEN..o|THIS=thi|
|00003930| 73 0d 0a 74 68 69 73 2e | 6c 52 75 6e 43 6f 64 65 |s..this.|lRunCode|
|00003940| 4d 6f 64 65 3d 2e 54 2e | 0d 0a 44 4f 20 52 75 6e |Mode=.T.|..DO Run|
|00003950| 43 6f 64 65 20 57 49 54 | 48 20 28 74 63 43 6f 64 |Code WIT|H (tcCod|
|00003960| 65 29 0d 0a 74 68 69 73 | 2e 6c 52 75 6e 43 6f 64 |e)..this|.lRunCod|
|00003970| 65 4d 6f 64 65 3d 2e 46 | 2e 0d 0a 6f 54 48 49 53 |eMode=.F|...oTHIS|
|00003980| 3d 2e 4e 55 4c 4c 2e 0d | 0a 53 45 54 20 44 41 54 |=.NULL..|.SET DAT|
|00003990| 41 53 45 53 53 49 4f 4e | 20 54 4f 20 28 6c 6e 44 |ASESSION| TO (lnD|
|000039a0| 61 74 61 53 65 73 73 69 | 6f 6e 49 44 29 0d 0a 53 |ataSessi|onID)..S|
|000039b0| 45 4c 45 43 54 20 28 6c | 6e 4c 61 73 74 53 65 6c |ELECT (l|nLastSel|
|000039c0| 65 63 74 29 0d 0a 74 68 | 69 73 2e 53 65 74 42 75 |ect)..th|is.SetBu|
|000039d0| 73 79 53 74 61 74 65 28 | 6c 6c 42 75 73 79 29 0d |syState(|llBusy).|
|000039e0| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 50 52 4f 43 |...ENDPR|OC..PROC|
|000039f0| 45 44 55 52 45 20 72 75 | 6e 73 63 72 69 70 74 0d |EDURE ru|nscript.|
|00003a00| 0a 4c 50 41 52 41 4d 45 | 54 45 52 53 20 74 63 53 |.LPARAME|TERS tcS|
|00003a10| 63 72 69 70 74 2c 74 63 | 41 6c 69 61 73 0d 0a 4c |cript,tc|Alias..L|
|00003a20| 4f 43 41 4c 20 6c 6c 52 | 65 73 75 6c 74 0d 0a 0d |OCAL llR|esult...|
|00003a30| 0a 49 46 20 74 68 69 73 | 2e 6c 52 65 6c 65 61 73 |.IF this|.lReleas|
|00003a40| 65 20 4f 52 20 45 4d 50 | 54 59 28 74 63 53 63 72 |e OR EMP|TY(tcScr|
|00003a50| 69 70 74 29 0d 0a 09 52 | 45 54 55 52 4e 20 2e 46 |ipt)...R|ETURN .F|
|00003a60| 2e 0d 0a 45 4e 44 49 46 | 0d 0a 49 46 20 74 68 69 |...ENDIF|..IF thi|
|00003a70| 73 2e 6c 44 65 62 75 67 | 0d 0a 09 41 43 54 49 56 |s.lDebug|...ACTIV|
|00003a80| 41 54 45 20 53 43 52 45 | 45 4e 0d 0a 09 3f 20 50 |ATE SCRE|EN...? P|
|00003a90| 52 4f 47 52 41 4d 28 29 | 0d 0a 09 3f 20 22 53 63 |ROGRAM()|...? "Sc|
|00003aa0| 72 69 70 74 3a 20 22 2b | 74 63 53 63 72 69 70 74 |ript: "+|tcScript|
|00003ab0| 0d 0a 45 4e 44 49 46 0d | 0a 6c 6c 52 65 73 75 6c |..ENDIF.|.llResul|
|00003ac0| 74 3d 74 68 69 73 2e 56 | 46 50 53 63 72 69 70 74 |t=this.V|FPScript|
|00003ad0| 28 74 63 53 63 72 69 70 | 74 2c 74 63 41 6c 69 61 |(tcScrip|t,tcAlia|
|00003ae0| 73 2c 30 29 0d 0a 49 46 | 20 74 68 69 73 2e 6c 44 |s,0)..IF| this.lD|
|00003af0| 65 62 75 67 20 41 4e 44 | 20 4e 4f 54 20 6c 6c 52 |ebug AND| NOT llR|
|00003b00| 65 73 75 6c 74 0d 0a 09 | 41 43 54 49 56 41 54 45 |esult...|ACTIVATE|
|00003b10| 20 53 43 52 45 45 4e 0d | 0a 09 3f 20 22 53 63 72 | SCREEN.|..? "Scr|
|00003b20| 69 70 74 3a 20 22 2b 74 | 63 53 63 72 69 70 74 2b |ipt: "+t|cScript+|
|00003b30| 22 20 20 28 6e 6f 74 20 | 66 6f 75 6e 64 29 22 0d |"  (not |found)".|
|00003b40| 0a 45 4e 44 49 46 0d 0a | 52 45 54 55 52 4e 20 6c |.ENDIF..|RETURN l|
|00003b50| 6c 52 65 73 75 6c 74 0d | 0a 0d 0a 45 4e 44 50 52 |lResult.|...ENDPR|
|00003b60| 4f 43 0d 0a 50 52 4f 43 | 45 44 55 52 45 20 76 61 |OC..PROC|EDURE va|
|00003b70| 6c 69 64 75 72 6c 0d 0a | 4c 50 41 52 41 4d 45 54 |lidurl..|LPARAMET|
|00003b80| 45 52 53 20 74 63 55 52 | 4c 0d 0a 4c 4f 43 41 4c |ERS tcUR|L..LOCAL|
|00003b90| 20 6c 63 55 52 4c 0d 0a | 0d 0a 49 46 20 45 4d 50 | lcURL..|..IF EMP|
|00003ba0| 54 59 28 74 63 55 52 4c | 29 0d 0a 09 52 45 54 55 |TY(tcURL|)...RETU|
|00003bb0| 52 4e 20 22 22 0d 0a 45 | 4e 44 49 46 0d 0a 6c 63 |RN ""..E|NDIF..lc|
|00003bc0| 55 52 4c 3d 41 4c 4c 54 | 52 49 4d 28 74 63 55 52 |URL=ALLT|RIM(tcUR|
|00003bd0| 4c 29 0d 0a 49 46 20 4e | 4f 54 20 4c 4f 57 45 52 |L)..IF N|OT LOWER|
|00003be0| 28 4c 45 46 54 28 6c 63 | 55 52 4c 2c 35 29 29 3d |(LEFT(lc|URL,5))=|
|00003bf0| 3d 22 68 74 74 70 3a 22 | 20 41 4e 44 20 4e 4f 54 |="http:"| AND NOT|
|00003c00| 20 4c 4f 57 45 52 28 4c | 45 46 54 28 6c 63 55 52 | LOWER(L|EFT(lcUR|
|00003c10| 4c 2c 35 29 29 3d 3d 22 | 66 69 6c 65 3a 22 20 41 |L,5))=="|file:" A|
|00003c20| 4e 44 20 3b 0d 0a 09 09 | 28 4c 4f 57 45 52 28 4c |ND ;....|(LOWER(L|
|00003c30| 45 46 54 28 6c 63 55 52 | 4c 2c 34 29 29 3d 3d 22 |EFT(lcUR|L,4))=="|
|00003c40| 77 77 77 2e 22 20 4f 52 | 20 3b 0d 0a 09 09 49 4e |www." OR| ;....IN|
|00003c50| 4c 49 53 54 28 4c 4f 57 | 45 52 28 52 49 47 48 54 |LIST(LOW|ER(RIGHT|
|00003c60| 28 6c 63 55 52 4c 2c 34 | 29 29 2c 22 2e 63 6f 6d |(lcURL,4|)),".com|
|00003c70| 22 2c 22 2e 67 6f 76 22 | 2c 22 2e 6e 65 74 22 29 |",".gov"|,".net")|
|00003c80| 20 4f 52 20 3b 0d 0a 09 | 09 28 4e 4f 54 20 53 55 | OR ;...|.(NOT SU|
|00003c90| 42 53 54 52 28 6c 63 55 | 52 4c 2c 32 2c 31 29 3d |BSTR(lcU|RL,2,1)=|
|00003ca0| 3d 22 3a 22 20 41 4e 44 | 20 4e 4f 54 20 4c 45 46 |=":" AND| NOT LEF|
|00003cb0| 54 28 6c 63 55 52 4c 2c | 32 29 3d 3d 22 5c 5c 22 |T(lcURL,|2)=="\\"|
|00003cc0| 29 29 0d 0a 09 6c 63 55 | 52 4c 3d 22 68 74 74 70 |))...lcU|RL="http|
|00003cd0| 3a 2f 2f 22 2b 6c 63 55 | 52 4c 0d 0a 45 4e 44 49 |://"+lcU|RL..ENDI|
|00003ce0| 46 0d 0a 49 46 20 53 55 | 42 53 54 52 28 50 41 44 |F..IF SU|BSTR(PAD|
|00003cf0| 52 28 6c 63 55 52 4c 2c | 35 29 2c 35 2c 31 29 3d |R(lcURL,|5),5,1)=|
|00003d00| 3d 22 3a 22 0d 0a 09 6c | 63 55 52 4c 3d 53 54 52 |=":"...l|cURL=STR|
|00003d10| 54 52 41 4e 28 53 54 52 | 54 52 41 4e 28 6c 63 55 |TRAN(STR|TRAN(lcU|
|00003d20| 52 6c 2c 22 5c 22 2c 22 | 2f 22 29 2c 22 2f 2f 2f |Rl,"\","|/"),"///|
|00003d30| 22 2c 22 2f 2f 22 29 0d | 0a 45 4c 53 45 0d 0a 09 |","//").|.ELSE...|
|00003d40| 6c 63 55 52 4c 3d 22 66 | 69 6c 65 3a 2f 2f 22 2b |lcURL="f|ile://"+|
|00003d50| 53 54 52 54 52 41 4e 28 | 53 54 52 54 52 41 4e 28 |STRTRAN(|STRTRAN(|
|00003d60| 53 54 52 54 52 41 4e 28 | 6c 63 55 52 4c 2c 22 5c |STRTRAN(|lcURL,"\|
|00003d70| 22 2c 22 2f 22 29 2c 22 | 2f 2f 2f 22 2c 22 2f 2f |","/"),"|///","//|
|00003d80| 22 29 2c 22 2f 2f 22 2c | 22 2f 22 29 0d 0a 45 4e |"),"//",|"/")..EN|
|00003d90| 44 49 46 0d 0a 52 45 54 | 55 52 4e 20 6c 63 55 52 |DIF..RET|URN lcUR|
|00003da0| 4c 0d 0a 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 50 52 |L....END|PROC..PR|
|00003db0| 4f 43 45 44 55 52 45 20 | 77 69 6c 64 63 61 72 64 |OCEDURE |wildcard|
|00003dc0| 6d 61 74 63 68 0d 0a 4c | 50 41 52 41 4d 45 54 45 |match..L|PARAMETE|
|00003dd0| 52 53 20 74 63 4d 61 74 | 63 68 45 78 70 4c 69 73 |RS tcMat|chExpLis|
|00003de0| 74 2c 74 63 45 78 70 72 | 65 73 73 69 6f 6e 53 65 |t,tcExpr|essionSe|
|00003df0| 61 72 63 68 65 64 2c 74 | 6c 4d 61 74 63 68 41 73 |arched,t|lMatchAs|
|00003e00| 49 73 0d 0a 4c 4f 43 41 | 4c 20 6c 63 4d 61 74 63 |Is..LOCA|L lcMatc|
|00003e10| 68 45 78 70 4c 69 73 74 | 2c 6c 63 45 78 70 72 65 |hExpList|,lcExpre|
|00003e20| 73 73 69 6f 6e 53 65 61 | 72 63 68 65 64 2c 6c 6c |ssionSea|rched,ll|
|00003e30| 4d 61 74 63 68 41 73 49 | 73 2c 6c 63 4d 61 74 63 |MatchAsI|s,lcMatc|
|00003e40| 68 45 78 70 4c 69 73 74 | 32 0d 0a 4c 4f 43 41 4c |hExpList|2..LOCAL|
|00003e50| 20 6c 6e 4d 61 74 63 68 | 4c 65 6e 2c 6c 6e 45 78 | lnMatch|Len,lnEx|
|00003e60| 70 72 65 73 73 69 6f 6e | 4c 65 6e 2c 6c 6e 4d 61 |pression|Len,lnMa|
|00003e70| 74 63 68 43 6f 75 6e 74 | 2c 6c 6e 43 6f 75 6e 74 |tchCount|,lnCount|
|00003e80| 2c 6c 6e 43 6f 75 6e 74 | 32 2c 6c 6e 53 70 61 63 |,lnCount|2,lnSpac|
|00003e90| 65 43 6f 75 6e 74 0d 0a | 4c 4f 43 41 4c 20 6c 63 |eCount..|LOCAL lc|
|00003ea0| 4d 61 74 63 68 45 78 70 | 2c 6c 63 4d 61 74 63 68 |MatchExp|,lcMatch|
|00003eb0| 54 79 70 65 2c 6c 6e 4d | 61 74 63 68 54 79 70 65 |Type,lnM|atchType|
|00003ec0| 2c 6c 6e 41 74 50 6f 73 | 2c 6c 6e 41 74 50 6f 73 |,lnAtPos|,lnAtPos|
|00003ed0| 32 0d 0a 4c 4f 43 41 4c | 20 6c 6c 4d 61 74 63 68 |2..LOCAL| llMatch|
|00003ee0| 2c 6c 6c 4d 61 74 63 68 | 32 0d 0a 0d 0a 49 46 20 |,llMatch|2....IF |
|00003ef0| 45 4d 50 54 59 28 74 63 | 45 78 70 72 65 73 73 69 |EMPTY(tc|Expressi|
|00003f00| 6f 6e 53 65 61 72 63 68 | 65 64 29 0d 0a 09 49 46 |onSearch|ed)...IF|
|00003f10| 20 45 4d 50 54 59 28 74 | 63 4d 61 74 63 68 45 78 | EMPTY(t|cMatchEx|
|00003f20| 70 4c 69 73 74 29 20 4f | 52 20 41 4c 4c 54 52 49 |pList) O|R ALLTRI|
|00003f30| 4d 28 74 63 4d 61 74 63 | 68 45 78 70 4c 69 73 74 |M(tcMatc|hExpList|
|00003f40| 29 3d 3d 22 2a 22 0d 0a | 09 09 52 45 54 55 52 4e |)=="*"..|..RETURN|
|00003f50| 0d 0a 09 45 4e 44 49 46 | 0d 0a 09 52 45 54 55 52 |...ENDIF|...RETUR|
|00003f60| 4e 20 2e 46 2e 0d 0a 45 | 4e 44 49 46 0d 0a 6c 63 |N .F...E|NDIF..lc|
|00003f70| 4d 61 74 63 68 45 78 70 | 4c 69 73 74 3d 4c 4f 57 |MatchExp|List=LOW|
|00003f80| 45 52 28 41 4c 4c 54 52 | 49 4d 28 53 54 52 54 52 |ER(ALLTR|IM(STRTR|
|00003f90| 41 4e 28 74 63 4d 61 74 | 63 68 45 78 70 4c 69 73 |AN(tcMat|chExpLis|
|00003fa0| 74 2c 54 41 42 2c 22 20 | 22 29 29 29 0d 0a 6c 63 |t,TAB," |")))..lc|
|00003fb0| 45 78 70 72 65 73 73 69 | 6f 6e 53 65 61 72 63 68 |Expressi|onSearch|
|00003fc0| 65 64 3d 4c 4f 57 45 52 | 28 41 4c 4c 54 52 49 4d |ed=LOWER|(ALLTRIM|
|00003fd0| 28 53 54 52 54 52 41 4e | 28 74 63 45 78 70 72 65 |(STRTRAN|(tcExpre|
|00003fe0| 73 73 69 6f 6e 53 65 61 | 72 63 68 65 64 2c 54 41 |ssionSea|rched,TA|
|00003ff0| 42 2c 22 20 22 29 29 29 | 0d 0a 6c 6e 45 78 70 72 |B," ")))|..lnExpr|
|00004000| 65 73 73 69 6f 6e 4c 65 | 6e 3d 4c 45 4e 28 6c 63 |essionLe|n=LEN(lc|
|00004010| 45 78 70 72 65 73 73 69 | 6f 6e 53 65 61 72 63 68 |Expressi|onSearch|
|00004020| 65 64 29 0d 0a 49 46 20 | 6c 63 45 78 70 72 65 73 |ed)..IF |lcExpres|
|00004030| 73 69 6f 6e 53 65 61 72 | 63 68 65 64 3d 3d 6c 63 |sionSear|ched==lc|
|00004040| 4d 61 74 63 68 45 78 70 | 4c 69 73 74 0d 0a 09 52 |MatchExp|List...R|
|00004050| 45 54 55 52 4e 0d 0a 45 | 4e 44 49 46 0d 0a 6c 6c |ETURN..E|NDIF..ll|
|00004060| 4d 61 74 63 68 41 73 49 | 73 3d 74 6c 4d 61 74 63 |MatchAsI|s=tlMatc|
|00004070| 68 41 73 49 73 0d 0a 49 | 46 20 4c 45 46 54 28 6c |hAsIs..I|F LEFT(l|
|00004080| 63 4d 61 74 63 68 45 78 | 70 4c 69 73 74 2c 31 29 |cMatchEx|pList,1)|
|00004090| 3d 3d 5b 22 5d 20 41 4e | 44 20 52 49 47 48 54 28 |==["] AN|D RIGHT(|
|000040a0| 6c 63 4d 61 74 63 68 45 | 78 70 4c 69 73 74 2c 31 |lcMatchE|xpList,1|
|000040b0| 29 3d 3d 5b 22 5d 0d 0a | 09 6c 6c 4d 61 74 63 68 |)==["]..|.llMatch|
|000040c0| 41 73 49 73 3d 2e 54 2e | 0d 0a 09 6c 63 4d 61 74 |AsIs=.T.|...lcMat|
|000040d0| 63 68 45 78 70 4c 69 73 | 74 3d 41 4c 4c 54 52 49 |chExpLis|t=ALLTRI|
|000040e0| 4d 28 53 55 42 53 54 52 | 28 6c 63 4d 61 74 63 68 |M(SUBSTR|(lcMatch|
|000040f0| 45 78 70 4c 69 73 74 2c | 32 2c 4c 45 4e 28 6c 63 |ExpList,|2,LEN(lc|
|00004100| 4d 61 74 63 68 45 78 70 | 4c 69 73 74 29 2d 32 29 |MatchExp|List)-2)|
|00004110| 29 0d 0a 45 4e 44 49 46 | 0d 0a 49 46 20 4e 4f 54 |)..ENDIF|..IF NOT|
|00004120| 20 6c 6c 4d 61 74 63 68 | 41 73 49 73 20 41 4e 44 | llMatch|AsIs AND|
|00004130| 20 22 20 22 24 6c 63 4d | 61 74 63 68 45 78 70 4c | " "$lcM|atchExpL|
|00004140| 69 73 74 0d 0a 09 6c 6c | 4d 61 74 63 68 3d 2e 46 |ist...ll|Match=.F|
|00004150| 2e 0d 0a 09 6c 6e 53 70 | 61 63 65 43 6f 75 6e 74 |....lnSp|aceCount|
|00004160| 3d 4f 43 43 55 52 53 28 | 22 20 22 2c 6c 63 4d 61 |=OCCURS(|" ",lcMa|
|00004170| 74 63 68 45 78 70 4c 69 | 73 74 29 0d 0a 09 6c 63 |tchExpLi|st)...lc|
|00004180| 4d 61 74 63 68 45 78 70 | 4c 69 73 74 32 3d 6c 63 |MatchExp|List2=lc|
|00004190| 4d 61 74 63 68 45 78 70 | 4c 69 73 74 0d 0a 09 6c |MatchExp|List...l|
|000041a0| 6e 43 6f 75 6e 74 3d 30 | 0d 0a 09 44 4f 20 57 48 |nCount=0|...DO WH|
|000041b0| 49 4c 45 20 2e 54 2e 0d | 0a 09 09 6c 6e 41 74 50 |ILE .T..|...lnAtP|
|000041c0| 6f 73 3d 41 54 28 22 20 | 22 2c 6c 63 4d 61 74 63 |os=AT(" |",lcMatc|
|000041d0| 68 45 78 70 4c 69 73 74 | 32 29 0d 0a 09 09 49 46 |hExpList|2)....IF|
|000041e0| 20 6c 6e 41 74 50 6f 73 | 3d 30 0d 0a 09 09 09 6c | lnAtPos|=0.....l|
|000041f0| 63 4d 61 74 63 68 45 78 | 70 3d 41 4c 4c 54 52 49 |cMatchEx|p=ALLTRI|
|00004200| 4d 28 6c 63 4d 61 74 63 | 68 45 78 70 4c 69 73 74 |M(lcMatc|hExpList|
|00004210| 32 29 0d 0a 09 09 09 6c | 63 4d 61 74 63 68 45 78 |2).....l|cMatchEx|
|00004220| 70 4c 69 73 74 32 3d 22 | 22 0d 0a 09 09 45 4c 53 |pList2="|"....ELS|
|00004230| 45 0d 0a 09 09 09 6c 6e | 41 74 50 6f 73 32 3d 41 |E.....ln|AtPos2=A|
|00004240| 54 28 5b 22 5d 2c 6c 63 | 4d 61 74 63 68 45 78 70 |T(["],lc|MatchExp|
|00004250| 4c 69 73 74 32 29 0d 0a | 09 09 09 49 46 20 6c 6e |List2)..|...IF ln|
|00004260| 41 74 50 6f 73 32 3c 6c | 6e 41 74 50 6f 73 0d 0a |AtPos2<l|nAtPos..|
|00004270| 09 09 09 09 6c 6e 41 74 | 50 6f 73 32 3d 41 54 28 |....lnAt|Pos2=AT(|
|00004280| 5b 22 5d 2c 6c 63 4d 61 | 74 63 68 45 78 70 4c 69 |["],lcMa|tchExpLi|
|00004290| 73 74 32 2c 32 29 0d 0a | 09 09 09 09 49 46 20 6c |st2,2)..|....IF l|
|000042a0| 6e 41 74 50 6f 73 32 3e | 6c 6e 41 74 50 6f 73 0d |nAtPos2>|lnAtPos.|
|000042b0| 0a 09 09 09 09 09 6c 6e | 41 74 50 6f 73 3d 6c 6e |......ln|AtPos=ln|
|000042c0| 41 74 50 6f 73 32 0d 0a | 09 09 09 09 45 4e 44 49 |AtPos2..|....ENDI|
|000042d0| 46 0d 0a 09 09 09 45 4e | 44 49 46 0d 0a 09 09 09 |F.....EN|DIF.....|
|000042e0| 6c 63 4d 61 74 63 68 45 | 78 70 3d 41 4c 4c 54 52 |lcMatchE|xp=ALLTR|
|000042f0| 49 4d 28 4c 45 46 54 28 | 6c 63 4d 61 74 63 68 45 |IM(LEFT(|lcMatchE|
|00004300| 78 70 4c 69 73 74 32 2c | 6c 6e 41 74 50 6f 73 29 |xpList2,|lnAtPos)|
|00004310| 29 0d 0a 09 09 09 6c 63 | 4d 61 74 63 68 45 78 70 |).....lc|MatchExp|
|00004320| 4c 69 73 74 32 3d 41 4c | 4c 54 52 49 4d 28 53 55 |List2=AL|LTRIM(SU|
|00004330| 42 53 54 52 28 6c 63 4d | 61 74 63 68 45 78 70 4c |BSTR(lcM|atchExpL|
|00004340| 69 73 74 32 2c 6c 6e 41 | 74 50 6f 73 2b 31 29 29 |ist2,lnA|tPos+1))|
|00004350| 0d 0a 09 09 45 4e 44 49 | 46 0d 0a 09 09 49 46 20 |....ENDI|F....IF |
|00004360| 45 4d 50 54 59 28 6c 63 | 4d 61 74 63 68 45 78 70 |EMPTY(lc|MatchExp|
|00004370| 29 0d 0a 09 09 09 45 58 | 49 54 0d 0a 09 09 45 4e |).....EX|IT....EN|
|00004380| 44 49 46 0d 0a 09 09 6c | 63 4d 61 74 63 68 54 79 |DIF....l|cMatchTy|
|00004390| 70 65 3d 4c 45 46 54 28 | 6c 63 4d 61 74 63 68 45 |pe=LEFT(|lcMatchE|
|000043a0| 78 70 2c 31 29 0d 0a 09 | 09 44 4f 20 43 41 53 45 |xp,1)...|.DO CASE|
|000043b0| 0d 0a 09 09 09 43 41 53 | 45 20 6c 63 4d 61 74 63 |.....CAS|E lcMatc|
|000043c0| 68 54 79 70 65 3d 3d 22 | 2b 22 0d 0a 09 09 09 09 |hType=="|+"......|
|000043d0| 6c 6e 4d 61 74 63 68 54 | 79 70 65 3d 31 0d 0a 09 |lnMatchT|ype=1...|
|000043e0| 09 09 43 41 53 45 20 6c | 63 4d 61 74 63 68 54 79 |..CASE l|cMatchTy|
|000043f0| 70 65 3d 3d 22 2d 22 0d | 0a 09 09 09 09 6c 6e 4d |pe=="-".|.....lnM|
|00004400| 61 74 63 68 54 79 70 65 | 3d 2d 31 0d 0a 09 09 09 |atchType|=-1.....|
|00004410| 4f 54 48 45 52 57 49 53 | 45 0d 0a 09 09 09 09 6c |OTHERWIS|E......l|
|00004420| 6e 4d 61 74 63 68 54 79 | 70 65 3d 30 0d 0a 09 09 |nMatchTy|pe=0....|
|00004430| 45 4e 44 43 41 53 45 0d | 0a 09 09 49 46 20 6c 6e |ENDCASE.|...IF ln|
|00004440| 4d 61 74 63 68 54 79 70 | 65 23 30 0d 0a 09 09 09 |MatchTyp|e#0.....|
|00004450| 6c 63 4d 61 74 63 68 45 | 78 70 3d 41 4c 4c 54 52 |lcMatchE|xp=ALLTR|
|00004460| 49 4d 28 53 55 42 53 54 | 52 28 6c 63 4d 61 74 63 |IM(SUBST|R(lcMatc|
|00004470| 68 45 78 70 2c 32 29 29 | 0d 0a 09 09 45 4e 44 49 |hExp,2))|....ENDI|
|00004480| 46 0d 0a 09 09 6c 6c 4d | 61 74 63 68 32 3d 74 68 |F....llM|atch2=th|
|00004490| 69 73 2e 57 69 6c 64 43 | 61 72 64 4d 61 74 63 68 |is.WildC|ardMatch|
|000044a0| 28 6c 63 4d 61 74 63 68 | 45 78 70 2c 6c 63 45 78 |(lcMatch|Exp,lcEx|
|000044b0| 70 72 65 73 73 69 6f 6e | 53 65 61 72 63 68 65 64 |pression|Searched|
|000044c0| 2c 2e 54 2e 29 0d 0a 09 | 09 49 46 20 28 6c 6e 4d |,.T.)...|.IF (lnM|
|000044d0| 61 74 63 68 54 79 70 65 | 3d 31 20 41 4e 44 20 4e |atchType|=1 AND N|
|000044e0| 4f 54 20 6c 6c 4d 61 74 | 63 68 32 29 20 4f 52 20 |OT llMat|ch2) OR |
|000044f0| 28 6c 6e 4d 61 74 63 68 | 54 79 70 65 3d 2d 31 20 |(lnMatch|Type=-1 |
|00004500| 41 4e 44 20 6c 6c 4d 61 | 74 63 68 32 29 0d 0a 09 |AND llMa|tch2)...|
|00004510| 09 09 52 45 54 55 52 4e | 20 2e 46 2e 0d 0a 09 09 |..RETURN| .F.....|
|00004520| 45 4e 44 49 46 0d 0a 09 | 09 6c 6c 4d 61 74 63 68 |ENDIF...|.llMatch|
|00004530| 3d 28 6c 6c 4d 61 74 63 | 68 20 4f 52 20 6c 6c 4d |=(llMatc|h OR llM|
|00004540| 61 74 63 68 32 29 0d 0a | 09 09 49 46 20 6c 6e 41 |atch2)..|..IF lnA|
|00004550| 74 50 6f 73 3d 30 0d 0a | 09 09 09 45 58 49 54 0d |tPos=0..|...EXIT.|
|00004560| 0a 09 09 45 4e 44 49 46 | 0d 0a 09 45 4e 44 44 4f |...ENDIF|...ENDDO|
|00004570| 0d 0a 09 52 45 54 55 52 | 4e 20 6c 6c 4d 61 74 63 |...RETUR|N llMatc|
|00004580| 68 0d 0a 45 4c 53 45 0d | 0a 09 49 46 20 4c 45 46 |h..ELSE.|..IF LEF|
|00004590| 54 28 6c 63 4d 61 74 63 | 68 45 78 70 4c 69 73 74 |T(lcMatc|hExpList|
|000045a0| 2c 31 29 3d 3d 22 7e 22 | 0d 0a 09 09 52 45 54 55 |,1)=="~"|....RETU|
|000045b0| 52 4e 20 28 44 49 46 46 | 45 52 45 4e 43 45 28 41 |RN (DIFF|ERENCE(A|
|000045c0| 4c 4c 54 52 49 4d 28 53 | 55 42 53 54 52 28 6c 63 |LLTRIM(S|UBSTR(lc|
|000045d0| 4d 61 74 63 68 45 78 70 | 4c 69 73 74 2c 32 29 29 |MatchExp|List,2))|
|000045e0| 2c 6c 63 45 78 70 72 65 | 73 73 69 6f 6e 53 65 61 |,lcExpre|ssionSea|
|000045f0| 72 63 68 65 64 29 3e 3d | 33 29 0d 0a 09 45 4e 44 |rched)>=|3)...END|
|00004600| 49 46 0d 0a 45 4e 44 49 | 46 0d 0a 6c 6e 4d 61 74 |IF..ENDI|F..lnMat|
|00004610| 63 68 43 6f 75 6e 74 3d | 4f 43 43 55 52 53 28 22 |chCount=|OCCURS("|
|00004620| 2c 22 2c 6c 63 4d 61 74 | 63 68 45 78 70 4c 69 73 |,",lcMat|chExpLis|
|00004630| 74 29 2b 31 0d 0a 49 46 | 20 6c 6e 4d 61 74 63 68 |t)+1..IF| lnMatch|
|00004640| 43 6f 75 6e 74 3e 31 0d | 0a 09 6c 63 4d 61 74 63 |Count>1.|..lcMatc|
|00004650| 68 45 78 70 4c 69 73 74 | 3d 22 2c 22 2b 41 4c 4c |hExpList|=","+ALL|
|00004660| 54 52 49 4d 28 6c 63 4d | 61 74 63 68 45 78 70 4c |TRIM(lcM|atchExpL|
|00004670| 69 73 74 29 2b 22 2c 22 | 0d 0a 45 4e 44 49 46 0d |ist)+","|..ENDIF.|
|00004680| 0a 46 4f 52 20 6c 6e 43 | 6f 75 6e 74 20 3d 20 31 |.FOR lnC|ount = 1|
|00004690| 20 54 4f 20 6c 6e 4d 61 | 74 63 68 43 6f 75 6e 74 | TO lnMa|tchCount|
|000046a0| 0d 0a 09 49 46 20 6c 6e | 4d 61 74 63 68 43 6f 75 |...IF ln|MatchCou|
|000046b0| 6e 74 3d 31 0d 0a 09 09 | 6c 63 4d 61 74 63 68 45 |nt=1....|lcMatchE|
|000046c0| 78 70 3d 4c 4f 57 45 52 | 28 41 4c 4c 54 52 49 4d |xp=LOWER|(ALLTRIM|
|000046d0| 28 6c 63 4d 61 74 63 68 | 45 78 70 4c 69 73 74 29 |(lcMatch|ExpList)|
|000046e0| 29 0d 0a 09 09 6c 6e 4d | 61 74 63 68 4c 65 6e 3d |)....lnM|atchLen=|
|000046f0| 4c 45 4e 28 6c 63 4d 61 | 74 63 68 45 78 70 29 0d |LEN(lcMa|tchExp).|
|00004700| 0a 09 45 4c 53 45 0d 0a | 09 09 6c 6e 41 74 50 6f |..ELSE..|..lnAtPo|
|00004710| 73 3d 41 54 28 22 2c 22 | 2c 6c 63 4d 61 74 63 68 |s=AT(","|,lcMatch|
|00004720| 45 78 70 4c 69 73 74 2c | 6c 6e 43 6f 75 6e 74 29 |ExpList,|lnCount)|
|00004730| 0d 0a 09 09 6c 6e 4d 61 | 74 63 68 4c 65 6e 3d 41 |....lnMa|tchLen=A|
|00004740| 54 28 22 2c 22 2c 6c 63 | 4d 61 74 63 68 45 78 70 |T(",",lc|MatchExp|
|00004750| 4c 69 73 74 2c 6c 6e 43 | 6f 75 6e 74 2b 31 29 2d |List,lnC|ount+1)-|
|00004760| 6c 6e 41 74 50 6f 73 2d | 31 0d 0a 09 09 6c 63 4d |lnAtPos-|1....lcM|
|00004770| 61 74 63 68 45 78 70 3d | 4c 4f 57 45 52 28 41 4c |atchExp=|LOWER(AL|
|00004780| 4c 54 52 49 4d 28 53 55 | 42 53 54 52 28 6c 63 4d |LTRIM(SU|BSTR(lcM|
|00004790| 61 74 63 68 45 78 70 4c | 69 73 74 2c 6c 6e 41 74 |atchExpL|ist,lnAt|
|000047a0| 50 6f 73 2b 31 2c 6c 6e | 4d 61 74 63 68 4c 65 6e |Pos+1,ln|MatchLen|
|000047b0| 29 29 29 0d 0a 09 45 4e | 44 49 46 0d 0a 09 46 4f |)))...EN|DIF...FO|
|000047c0| 52 20 6c 6e 43 6f 75 6e | 74 32 20 3d 20 31 20 54 |R lnCoun|t2 = 1 T|
|000047d0| 4f 20 4f 43 43 55 52 53 | 28 22 3f 22 2c 6c 63 4d |O OCCURS|("?",lcM|
|000047e0| 61 74 63 68 45 78 70 29 | 0d 0a 09 09 6c 6e 41 74 |atchExp)|....lnAt|
|000047f0| 50 6f 73 3d 41 54 28 22 | 3f 22 2c 6c 63 4d 61 74 |Pos=AT("|?",lcMat|
|00004800| 63 68 45 78 70 29 0d 0a | 09 09 49 46 20 6c 6e 41 |chExp)..|..IF lnA|
|00004810| 74 50 6f 73 3e 6c 6e 45 | 78 70 72 65 73 73 69 6f |tPos>lnE|xpressio|
|00004820| 6e 4c 65 6e 0d 0a 09 09 | 09 49 46 20 28 6c 6e 41 |nLen....|.IF (lnA|
|00004830| 74 50 6f 73 2d 31 29 3d | 6c 6e 45 78 70 72 65 73 |tPos-1)=|lnExpres|
|00004840| 73 69 6f 6e 4c 65 6e 0d | 0a 09 09 09 09 6c 63 45 |sionLen.|.....lcE|
|00004850| 78 70 72 65 73 73 69 6f | 6e 53 65 61 72 63 68 65 |xpressio|nSearche|
|00004860| 64 3d 6c 63 45 78 70 72 | 65 73 73 69 6f 6e 53 65 |d=lcExpr|essionSe|
|00004870| 61 72 63 68 65 64 2b 22 | 3f 22 0d 0a 09 09 09 45 |arched+"|?".....E|
|00004880| 4e 44 49 46 0d 0a 09 09 | 09 45 58 49 54 0d 0a 09 |NDIF....|.EXIT...|
|00004890| 09 45 4e 44 49 46 0d 0a | 09 09 6c 63 4d 61 74 63 |.ENDIF..|..lcMatc|
|000048a0| 68 45 78 70 3d 53 54 55 | 46 46 28 6c 63 4d 61 74 |hExp=STU|FF(lcMat|
|000048b0| 63 68 45 78 70 2c 6c 6e | 41 74 50 6f 73 2c 31 2c |chExp,ln|AtPos,1,|
|000048c0| 53 55 42 53 54 52 28 6c | 63 45 78 70 72 65 73 73 |SUBSTR(l|cExpress|
|000048d0| 69 6f 6e 53 65 61 72 63 | 68 65 64 2c 6c 6e 41 74 |ionSearc|hed,lnAt|
|000048e0| 50 6f 73 2c 31 29 29 0d | 0a 09 45 4e 44 46 4f 52 |Pos,1)).|..ENDFOR|
|000048f0| 0d 0a 09 49 46 20 45 4d | 50 54 59 28 6c 63 4d 61 |...IF EM|PTY(lcMa|
|00004900| 74 63 68 45 78 70 29 20 | 4f 52 20 6c 63 45 78 70 |tchExp) |OR lcExp|
|00004910| 72 65 73 73 69 6f 6e 53 | 65 61 72 63 68 65 64 3d |ressionS|earched=|
|00004920| 3d 6c 63 4d 61 74 63 68 | 45 78 70 20 4f 52 20 3b |=lcMatch|Exp OR ;|
|00004930| 0d 0a 09 09 09 6c 63 4d | 61 74 63 68 45 78 70 3d |.....lcM|atchExp=|
|00004940| 3d 22 2a 22 20 4f 52 20 | 6c 63 4d 61 74 63 68 45 |="*" OR |lcMatchE|
|00004950| 78 70 3d 3d 22 3f 22 20 | 4f 52 20 6c 63 4d 61 74 |xp=="?" |OR lcMat|
|00004960| 63 68 45 78 70 3d 3d 22 | 25 25 22 0d 0a 09 09 52 |chExp=="|%%"....R|
|00004970| 45 54 55 52 4e 0d 0a 09 | 45 4e 44 49 46 0d 0a 09 |ETURN...|ENDIF...|
|00004980| 49 46 20 4c 45 46 54 28 | 6c 63 4d 61 74 63 68 45 |IF LEFT(|lcMatchE|
|00004990| 78 70 2c 31 29 3d 3d 22 | 2a 22 0d 0a 09 09 52 45 |xp,1)=="|*"....RE|
|000049a0| 54 55 52 4e 20 28 53 55 | 42 53 54 52 28 6c 63 4d |TURN (SU|BSTR(lcM|
|000049b0| 61 74 63 68 45 78 70 2c | 32 29 3d 3d 52 49 47 48 |atchExp,|2)==RIGH|
|000049c0| 54 28 6c 63 45 78 70 72 | 65 73 73 69 6f 6e 53 65 |T(lcExpr|essionSe|
|000049d0| 61 72 63 68 65 64 2c 4c | 45 4e 28 6c 63 4d 61 74 |arched,L|EN(lcMat|
|000049e0| 63 68 45 78 70 29 2d 31 | 29 29 0d 0a 09 45 4e 44 |chExp)-1|))...END|
|000049f0| 49 46 0d 0a 09 49 46 20 | 4c 45 46 54 28 6c 63 4d |IF...IF |LEFT(lcM|
|00004a00| 61 74 63 68 45 78 70 2c | 31 29 3d 3d 22 25 22 20 |atchExp,|1)=="%" |
|00004a10| 41 4e 44 20 52 49 47 48 | 54 28 6c 63 4d 61 74 63 |AND RIGH|T(lcMatc|
|00004a20| 68 45 78 70 2c 31 29 3d | 3d 22 25 22 20 41 4e 44 |hExp,1)=|="%" AND|
|00004a30| 20 3b 0d 0a 09 09 09 53 | 55 42 53 54 52 28 6c 63 | ;.....S|UBSTR(lc|
|00004a40| 4d 61 74 63 68 45 78 70 | 2c 32 2c 6c 6e 4d 61 74 |MatchExp|,2,lnMat|
|00004a50| 63 68 4c 65 6e 2d 32 29 | 24 6c 63 45 78 70 72 65 |chLen-2)|$lcExpre|
|00004a60| 73 73 69 6f 6e 53 65 61 | 72 63 68 65 64 0d 0a 09 |ssionSea|rched...|
|00004a70| 09 52 45 54 55 52 4e 0d | 0a 09 45 4e 44 49 46 0d |.RETURN.|..ENDIF.|
|00004a80| 0a 09 6c 6e 41 74 50 6f | 73 3d 41 54 28 22 2a 22 |..lnAtPo|s=AT("*"|
|00004a90| 2c 6c 63 4d 61 74 63 68 | 45 78 70 29 0d 0a 09 49 |,lcMatch|Exp)...I|
|00004aa0| 46 20 6c 6e 41 74 50 6f | 73 3e 30 20 41 4e 44 20 |F lnAtPo|s>0 AND |
|00004ab0| 28 6c 6e 41 74 50 6f 73 | 2d 31 29 3c 3d 6c 6e 45 |(lnAtPos|-1)<=lnE|
|00004ac0| 78 70 72 65 73 73 69 6f | 6e 4c 65 6e 20 41 4e 44 |xpressio|nLen AND|
|00004ad0| 20 3b 0d 0a 09 09 09 4c | 45 46 54 28 6c 63 45 78 | ;.....L|EFT(lcEx|
|00004ae0| 70 72 65 73 73 69 6f 6e | 53 65 61 72 63 68 65 64 |pression|Searched|
|00004af0| 2c 6c 6e 41 74 50 6f 73 | 2d 31 29 3d 3d 4c 45 46 |,lnAtPos|-1)==LEF|
|00004b00| 54 28 6c 63 4d 61 74 63 | 68 45 78 70 2c 6c 6e 41 |T(lcMatc|hExp,lnA|
|00004b10| 74 50 6f 73 2d 31 29 0d | 0a 09 09 52 45 54 55 52 |tPos-1).|...RETUR|
|00004b20| 4e 0d 0a 09 45 4e 44 49 | 46 0d 0a 45 4e 44 46 4f |N...ENDI|F..ENDFO|
|00004b30| 52 0d 0a 52 45 54 55 52 | 4e 20 2e 46 2e 0d 0a 0d |R..RETUR|N .F....|
|00004b40| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|00004b50| 55 52 45 20 72 65 66 72 | 65 73 68 6d 6f 64 65 0d |URE refr|eshmode.|
|00004b60| 0a 4c 4f 43 41 4c 20 6c | 6c 42 75 73 79 0d 0a 0d |.LOCAL l|lBusy...|
|00004b70| 0a 49 46 20 74 68 69 73 | 2e 6c 52 65 6c 65 61 73 |.IF this|.lReleas|
|00004b80| 65 20 4f 52 20 45 4d 50 | 54 59 28 74 68 69 73 2e |e OR EMP|TY(this.|
|00004b90| 63 53 6f 75 72 63 65 46 | 69 6c 65 4e 61 6d 65 29 |cSourceF|ileName)|
|00004ba0| 0d 0a 09 74 68 69 73 2e | 6c 52 65 66 72 65 73 68 |...this.|lRefresh|
|00004bb0| 4d 6f 64 65 3d 2e 46 2e | 0d 0a 09 52 45 54 55 52 |Mode=.F.|...RETUR|
|00004bc0| 4e 20 2e 46 2e 0d 0a 45 | 4e 44 49 46 0d 0a 6c 6c |N .F...E|NDIF..ll|
|00004bd0| 42 75 73 79 3d 74 68 69 | 73 2e 6c 42 75 73 79 0d |Busy=thi|s.lBusy.|
|00004be0| 0a 74 68 69 73 2e 53 65 | 74 42 75 73 79 53 74 61 |.this.Se|tBusySta|
|00004bf0| 74 65 28 2e 54 2e 29 0d | 0a 74 68 69 73 2e 6c 52 |te(.T.).|.this.lR|
|00004c00| 65 66 72 65 73 68 4d 6f | 64 65 3d 2e 54 2e 0d 0a |efreshMo|de=.T...|
|00004c10| 74 68 69 73 2e 6c 48 69 | 73 74 6f 72 79 45 6e 61 |this.lHi|storyEna|
|00004c20| 62 6c 65 64 3d 2e 46 2e | 0d 0a 74 68 69 73 2e 4e |bled=.F.|..this.N|
|00004c30| 61 76 69 67 61 74 65 28 | 74 68 69 73 2e 63 53 6f |avigate(|this.cSo|
|00004c40| 75 72 63 65 46 69 6c 65 | 4e 61 6d 65 29 0d 0a 74 |urceFile|Name)..t|
|00004c50| 68 69 73 2e 53 65 74 42 | 75 73 79 53 74 61 74 65 |his.SetB|usyState|
|00004c60| 28 6c 6c 42 75 73 79 29 | 0d 0a 0d 0a 45 4e 44 50 |(llBusy)|....ENDP|
|00004c70| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 6f |ROC..PRO|CEDURE o|
|00004c80| 70 65 6e 76 66 70 73 63 | 72 69 70 74 0d 0a 4c 4f |penvfpsc|ript..LO|
|00004c90| 43 41 4c 20 6c 63 46 69 | 6c 65 4e 61 6d 65 2c 6c |CAL lcFi|leName,l|
|00004ca0| 6e 4c 61 73 74 53 65 6c | 65 63 74 2c 6c 63 4c 61 |nLastSel|ect,lcLa|
|00004cb0| 73 74 53 65 74 53 61 66 | 65 74 79 0d 0a 0d 0a 53 |stSetSaf|ety....S|
|00004cc0| 45 54 20 44 41 54 41 53 | 45 53 53 49 4f 4e 20 54 |ET DATAS|ESSION T|
|00004cd0| 4f 20 28 74 68 69 73 2e | 6f 48 6f 73 74 2e 44 61 |O (this.|oHost.Da|
|00004ce0| 74 61 53 65 73 73 69 6f | 6e 49 44 29 0d 0a 49 46 |taSessio|nID)..IF|
|00004cf0| 20 55 53 45 44 28 22 76 | 66 70 73 63 72 69 70 74 | USED("v|fpscript|
|00004d00| 22 29 0d 0a 09 52 45 54 | 55 52 4e 0d 0a 45 4e 44 |")...RET|URN..END|
|00004d10| 49 46 0d 0a 49 46 20 74 | 68 69 73 2e 6c 52 65 6c |IF..IF t|his.lRel|
|00004d20| 65 61 73 65 20 4f 52 20 | 4e 4f 54 20 74 68 69 73 |ease OR |NOT this|
|00004d30| 2e 6c 56 46 50 53 63 72 | 69 70 74 20 4f 52 20 45 |.lVFPScr|ipt OR E|
|00004d40| 4d 50 54 59 28 74 68 69 | 73 2e 63 56 46 50 53 63 |MPTY(thi|s.cVFPSc|
|00004d50| 72 69 70 74 29 0d 0a 09 | 52 45 54 55 52 4e 20 2e |ript)...|RETURN .|
|00004d60| 46 2e 0d 0a 45 4e 44 49 | 46 0d 0a 6c 63 4c 61 73 |F...ENDI|F..lcLas|
|00004d70| 74 53 65 74 53 61 66 65 | 74 79 3d 53 45 54 28 22 |tSetSafe|ty=SET("|
|00004d80| 53 41 46 45 54 59 22 29 | 0d 0a 53 45 54 20 53 41 |SAFETY")|..SET SA|
|00004d90| 46 45 54 59 20 4f 46 46 | 0d 0a 6c 6e 4c 61 73 74 |FETY OFF|..lnLast|
|00004da0| 53 65 6c 65 63 74 3d 53 | 45 4c 45 43 54 28 29 0d |Select=S|ELECT().|
|00004db0| 0a 6c 63 46 69 6c 65 4e | 61 6d 65 3d 74 68 69 73 |.lcFileN|ame=this|
|00004dc0| 2e 63 56 46 50 53 63 72 | 69 70 74 0d 0a 49 46 20 |.cVFPScr|ipt..IF |
|00004dd0| 4e 4f 54 20 45 4d 50 54 | 59 28 53 59 53 28 32 30 |NOT EMPT|Y(SYS(20|
|00004de0| 30 30 2c 6c 63 46 69 6c | 65 4e 61 6d 65 29 29 0d |00,lcFil|eName)).|
|00004df0| 0a 09 53 45 4c 45 43 54 | 20 30 0d 0a 09 55 53 45 |..SELECT| 0...USE|
|00004e00| 20 28 6c 63 46 69 6c 65 | 4e 61 6d 65 29 20 53 48 | (lcFile|Name) SH|
|00004e10| 41 52 45 44 20 41 4c 49 | 41 53 20 76 66 70 73 63 |ARED ALI|AS vfpsc|
|00004e20| 72 69 70 74 20 41 47 41 | 49 4e 0d 0a 09 49 46 20 |ript AGA|IN...IF |
|00004e30| 4e 4f 54 20 55 53 45 44 | 28 29 0d 0a 09 09 53 45 |NOT USED|()....SE|
|00004e40| 4c 45 43 54 20 28 6c 6e | 4c 61 73 74 53 65 6c 65 |LECT (ln|LastSele|
|00004e50| 63 74 29 0d 0a 09 09 49 | 46 20 6c 63 4c 61 73 74 |ct)....I|F lcLast|
|00004e60| 53 65 74 53 61 66 65 74 | 79 3d 3d 22 4f 4e 22 0d |SetSafet|y=="ON".|
|00004e70| 0a 09 09 09 53 45 54 20 | 53 41 46 45 54 59 20 4f |....SET |SAFETY O|
|00004e80| 4e 0d 0a 09 09 45 4c 53 | 45 0d 0a 09 09 09 53 45 |N....ELS|E.....SE|
|00004e90| 54 20 53 41 46 45 54 59 | 20 4f 46 46 0d 0a 09 09 |T SAFETY| OFF....|
|00004ea0| 45 4e 44 49 46 0d 0a 09 | 09 52 45 54 55 52 4e 20 |ENDIF...|.RETURN |
|00004eb0| 2e 46 2e 0d 0a 09 45 4e | 44 49 46 0d 0a 09 49 46 |.F....EN|DIF...IF|
|00004ec0| 20 46 43 4f 55 4e 54 28 | 29 3c 39 0d 0a 09 09 55 | FCOUNT(|)<9....U|
|00004ed0| 53 45 0d 0a 09 09 45 52 | 41 53 45 20 28 6c 63 46 |SE....ER|ASE (lcF|
|00004ee0| 69 6c 65 4e 61 6d 65 29 | 0d 0a 09 45 4e 44 49 46 |ileName)|...ENDIF|
|00004ef0| 0d 0a 45 4e 44 49 46 0d | 0a 49 46 20 45 4d 50 54 |..ENDIF.|.IF EMPT|
|00004f00| 59 28 53 59 53 28 32 30 | 30 30 2c 6c 63 46 69 6c |Y(SYS(20|00,lcFil|
|00004f10| 65 4e 61 6d 65 29 29 20 | 4f 52 20 54 59 50 45 28 |eName)) |OR TYPE(|
|00004f20| 22 42 65 66 6f 72 65 4e | 61 76 22 29 23 22 4c 22 |"BeforeN|av")#"L"|
|00004f30| 0d 0a 09 49 46 20 55 53 | 45 44 28 22 76 66 70 73 |...IF US|ED("vfps|
|00004f40| 63 72 69 70 74 22 29 0d | 0a 09 09 55 53 45 20 49 |cript").|...USE I|
|00004f50| 4e 20 76 66 70 73 63 72 | 69 70 74 0d 0a 09 45 4e |N vfpscr|ipt...EN|
|00004f60| 44 49 46 0d 0a 09 45 52 | 41 53 45 20 28 6c 63 46 |DIF...ER|ASE (lcF|
|00004f70| 69 6c 65 4e 61 6d 65 29 | 0d 0a 09 53 45 4c 45 43 |ileName)|...SELEC|
|00004f80| 54 20 30 0d 0a 09 43 52 | 45 41 54 45 20 54 41 42 |T 0...CR|EATE TAB|
|00004f90| 4c 45 20 28 6c 63 46 69 | 6c 65 4e 61 6d 65 29 20 |LE (lcFi|leName) |
|00004fa0| 3b 0d 0a 09 09 09 28 49 | 6e 64 65 78 56 61 6c 75 |;.....(I|ndexValu|
|00004fb0| 65 20 43 28 31 30 29 2c | 20 4e 61 6d 65 20 43 28 |e C(10),| Name C(|
|00004fc0| 32 34 29 2c 20 48 54 4d | 4c 20 4d 2c 20 53 63 72 |24), HTM|L M, Scr|
|00004fd0| 69 70 74 20 4d 2c 20 42 | 65 66 6f 72 65 4e 61 76 |ipt M, B|eforeNav|
|00004fe0| 20 4c 2c 20 55 52 4c 4d | 61 74 63 68 20 4d 2c 20 | L, URLM|atch M, |
|00004ff0| 3b 0d 0a 09 09 09 55 52 | 4c 45 76 61 6c 20 4d 2c |;.....UR|LEval M,|
|00005000| 20 55 52 4c 4a 75 6d 70 | 20 4d 2c 20 55 52 4c 43 | URLJump| M, URLC|
|00005010| 61 6e 63 65 6c 20 4c 2c | 20 3b 0d 0a 09 09 09 43 |ancel L,| ;.....C|
|00005020| 6f 6e 74 69 6e 75 65 20 | 4c 2c 20 43 6f 6d 6d 65 |ontinue |L, Comme|
|00005030| 6e 74 20 4d 2c 20 4c 61 | 73 74 41 63 63 65 73 73 |nt M, La|stAccess|
|00005040| 20 54 2c 20 45 78 65 63 | 43 6f 75 6e 74 20 4e 28 | T, Exec|Count N(|
|00005050| 38 29 29 0d 0a 09 55 53 | 45 20 28 6c 63 46 69 6c |8))...US|E (lcFil|
|00005060| 65 4e 61 6d 65 29 20 53 | 48 41 52 45 44 20 41 4c |eName) S|HARED AL|
|00005070| 49 41 53 20 76 66 70 73 | 63 72 69 70 74 20 41 47 |IAS vfps|cript AG|
|00005080| 41 49 4e 0d 0a 45 4e 44 | 49 46 0d 0a 49 46 20 54 |AIN..END|IF..IF T|
|00005090| 59 50 45 28 22 4c 61 73 | 74 41 63 63 65 73 73 22 |YPE("Las|tAccess"|
|000050a0| 29 23 22 54 22 20 4f 52 | 20 54 59 50 45 28 22 45 |)#"T" OR| TYPE("E|
|000050b0| 78 65 63 43 6f 75 6e 74 | 22 29 23 22 4e 22 0d 0a |xecCount|")#"N"..|
|000050c0| 09 49 46 20 55 53 45 44 | 28 22 76 66 70 73 63 72 |.IF USED|("vfpscr|
|000050d0| 69 70 74 22 29 0d 0a 09 | 09 55 53 45 20 49 4e 20 |ipt")...|.USE IN |
|000050e0| 76 66 70 73 63 72 69 70 | 74 0d 0a 09 45 4e 44 49 |vfpscrip|t...ENDI|
|000050f0| 46 0d 0a 09 53 45 4c 45 | 43 54 20 30 0d 0a 09 55 |F...SELE|CT 0...U|
|00005100| 53 45 20 28 6c 63 46 69 | 6c 65 4e 61 6d 65 29 20 |SE (lcFi|leName) |
|00005110| 45 58 43 4c 55 53 49 56 | 45 20 41 4c 49 41 53 20 |EXCLUSIV|E ALIAS |
|00005120| 76 66 70 73 63 72 69 70 | 74 0d 0a 09 49 46 20 4e |vfpscrip|t...IF N|
|00005130| 4f 54 20 55 53 45 44 28 | 29 0d 0a 09 09 53 45 4c |OT USED(|)....SEL|
|00005140| 45 43 54 20 28 6c 6e 4c | 61 73 74 53 65 6c 65 63 |ECT (lnL|astSelec|
|00005150| 74 29 0d 0a 09 09 49 46 | 20 6c 63 4c 61 73 74 53 |t)....IF| lcLastS|
|00005160| 65 74 53 61 66 65 74 79 | 3d 3d 22 4f 4e 22 0d 0a |etSafety|=="ON"..|
|00005170| 09 09 09 53 45 54 20 53 | 41 46 45 54 59 20 4f 4e |...SET S|AFETY ON|
|00005180| 0d 0a 09 09 45 4c 53 45 | 0d 0a 09 09 09 53 45 54 |....ELSE|.....SET|
|00005190| 20 53 41 46 45 54 59 20 | 4f 46 46 0d 0a 09 09 45 | SAFETY |OFF....E|
|000051a0| 4e 44 49 46 0d 0a 09 09 | 52 45 54 55 52 4e 20 2e |NDIF....|RETURN .|
|000051b0| 46 2e 0d 0a 09 45 4e 44 | 49 46 0d 0a 09 49 46 20 |F....END|IF...IF |
|000051c0| 54 59 50 45 28 22 4c 61 | 73 74 41 63 63 65 73 73 |TYPE("La|stAccess|
|000051d0| 22 29 23 22 54 22 0d 0a | 09 09 41 4c 54 45 52 20 |")#"T"..|..ALTER |
|000051e0| 54 41 42 4c 45 20 28 6c | 63 46 69 6c 65 4e 61 6d |TABLE (l|cFileNam|
|000051f0| 65 29 20 41 44 44 20 43 | 4f 4c 55 4d 4e 20 4c 61 |e) ADD C|OLUMN La|
|00005200| 73 74 41 63 63 65 73 73 | 20 54 20 4e 55 4c 4c 0d |stAccess| T NULL.|
|00005210| 0a 09 45 4e 44 49 46 0d | 0a 09 49 46 20 54 59 50 |..ENDIF.|..IF TYP|
|00005220| 45 28 22 45 78 65 63 43 | 6f 75 6e 74 22 29 23 22 |E("ExecC|ount")#"|
|00005230| 4e 22 0d 0a 09 09 41 4c | 54 45 52 20 54 41 42 4c |N"....AL|TER TABL|
|00005240| 45 20 28 6c 63 46 69 6c | 65 4e 61 6d 65 29 20 41 |E (lcFil|eName) A|
|00005250| 44 44 20 43 4f 4c 55 4d | 4e 20 45 78 65 63 43 6f |DD COLUM|N ExecCo|
|00005260| 75 6e 74 20 4e 28 38 29 | 20 4e 55 4c 4c 0d 0a 09 |unt N(8)| NULL...|
|00005270| 45 4e 44 49 46 0d 0a 09 | 55 53 45 20 28 6c 63 46 |ENDIF...|USE (lcF|
|00005280| 69 6c 65 4e 61 6d 65 29 | 20 53 48 41 52 45 44 20 |ileName)| SHARED |
|00005290| 41 4c 49 41 53 20 76 66 | 70 73 63 72 69 70 74 20 |ALIAS vf|pscript |
|000052a0| 41 47 41 49 4e 0d 0a 45 | 4e 44 49 46 0d 0a 49 46 |AGAIN..E|NDIF..IF|
|000052b0| 20 4e 4f 54 20 55 53 45 | 44 28 22 76 66 70 73 63 | NOT USE|D("vfpsc|
|000052c0| 72 69 70 74 22 29 0d 0a | 09 53 45 4c 45 43 54 20 |ript")..|.SELECT |
|000052d0| 28 6c 6e 4c 61 73 74 53 | 65 6c 65 63 74 29 0d 0a |(lnLastS|elect)..|
|000052e0| 09 49 46 20 6c 63 4c 61 | 73 74 53 65 74 53 61 66 |.IF lcLa|stSetSaf|
|000052f0| 65 74 79 3d 3d 22 4f 4e | 22 0d 0a 09 09 53 45 54 |ety=="ON|"....SET|
|00005300| 20 53 41 46 45 54 59 20 | 4f 4e 0d 0a 09 45 4c 53 | SAFETY |ON...ELS|
|00005310| 45 0d 0a 09 09 53 45 54 | 20 53 41 46 45 54 59 20 |E....SET| SAFETY |
|00005320| 4f 46 46 0d 0a 09 45 4e | 44 49 46 0d 0a 09 52 45 |OFF...EN|DIF...RE|
|00005330| 54 55 52 4e 20 2e 46 2e | 0d 0a 45 4e 44 49 46 0d |TURN .F.|..ENDIF.|
|00005340| 0a 53 45 4c 45 43 54 20 | 76 66 70 73 63 72 69 70 |.SELECT |vfpscrip|
|00005350| 74 0d 0a 49 46 20 4b 45 | 59 28 31 29 3d 3d 22 49 |t..IF KE|Y(1)=="I|
|00005360| 4e 44 45 58 56 41 4c 55 | 45 22 0d 0a 09 53 45 54 |NDEXVALU|E"...SET|
|00005370| 20 4f 52 44 45 52 20 54 | 4f 20 49 6e 64 65 78 56 | ORDER T|O IndexV|
|00005380| 61 6c 75 65 0d 0a 45 4c | 53 45 0d 0a 09 49 4e 44 |alue..EL|SE...IND|
|00005390| 45 58 20 4f 4e 20 49 6e | 64 65 78 56 61 6c 75 65 |EX ON In|dexValue|
|000053a0| 20 54 41 47 20 49 6e 64 | 65 78 56 61 6c 75 65 20 | TAG Ind|exValue |
|000053b0| 41 53 43 45 4e 44 49 4e | 47 20 41 44 44 49 54 49 |ASCENDIN|G ADDITI|
|000053c0| 56 45 0d 0a 45 4e 44 49 | 46 0d 0a 53 45 54 20 46 |VE..ENDI|F..SET F|
|000053d0| 49 4c 54 45 52 20 54 4f | 20 4e 4f 54 20 44 45 4c |ILTER TO| NOT DEL|
|000053e0| 45 54 45 44 28 29 0d 0a | 4c 4f 43 41 54 45 0d 0a |ETED()..|LOCATE..|
|000053f0| 53 45 4c 45 43 54 20 30 | 0d 0a 0d 0a 45 4e 44 50 |SELECT 0|....ENDP|
|00005400| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 72 |ROC..PRO|CEDURE r|
|00005410| 65 66 72 65 73 68 64 65 | 61 63 74 69 76 61 74 65 |efreshde|activate|
|00005420| 0d 0a 49 46 20 74 68 69 | 73 2e 6c 52 65 6c 65 61 |..IF thi|s.lRelea|
|00005430| 73 65 20 4f 52 20 4e 4f | 54 20 74 68 69 73 2e 56 |se OR NO|T this.V|
|00005440| 69 73 69 62 6c 65 0d 0a | 09 52 45 54 55 52 4e 0d |isible..|.RETURN.|
|00005450| 0a 45 4e 44 49 46 0d 0a | 49 46 20 74 68 69 73 2e |.ENDIF..|IF this.|
|00005460| 6c 52 65 66 72 65 73 68 | 44 65 61 63 74 69 76 61 |lRefresh|Deactiva|
|00005470| 74 65 0d 0a 09 74 68 69 | 73 2e 56 69 73 69 62 6c |te...thi|s.Visibl|
|00005480| 65 3d 2e 46 2e 0d 0a 09 | 74 68 69 73 2e 56 69 73 |e=.F....|this.Vis|
|00005490| 69 62 6c 65 3d 2e 54 2e | 0d 0a 09 52 45 54 55 52 |ible=.T.|...RETUR|
|000054a0| 4e 0d 0a 45 4e 44 49 46 | 0d 0a 0d 0a 45 4e 44 50 |N..ENDIF|....ENDP|
|000054b0| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 72 |ROC..PRO|CEDURE r|
|000054c0| 65 6c 65 61 73 65 68 6f | 73 74 0d 0a 49 46 20 74 |eleaseho|st..IF t|
|000054d0| 68 69 73 2e 6c 52 65 6c | 65 61 73 65 0d 0a 09 52 |his.lRel|ease...R|
|000054e0| 45 54 55 52 4e 20 2e 46 | 2e 0d 0a 45 4e 44 49 46 |ETURN .F|...ENDIF|
|000054f0| 0d 0a 49 46 20 54 59 50 | 45 28 22 74 68 69 73 2e |..IF TYP|E("this.|
|00005500| 6f 48 6f 73 74 2e 74 6d | 72 48 6f 73 74 22 29 23 |oHost.tm|rHost")#|
|00005510| 22 4f 22 0d 0a 09 52 45 | 54 55 52 4e 20 2e 46 2e |"O"...RE|TURN .F.|
|00005520| 0d 0a 45 4e 44 49 46 0d | 0a 74 68 69 73 2e 6f 48 |..ENDIF.|.this.oH|
|00005530| 6f 73 74 2e 74 6d 72 48 | 6f 73 74 2e 52 75 6e 43 |ost.tmrH|ost.RunC|
|00005540| 6f 64 65 28 22 6f 54 48 | 49 53 2e 6f 48 6f 73 74 |ode("oTH|IS.oHost|
|00005550| 2e 52 65 6c 65 61 73 65 | 22 29 0d 0a 0d 0a 45 4e |.Release|")....EN|
|00005560| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00005570| 20 76 66 70 73 0d 0a 4c | 50 41 52 41 4d 45 54 45 | vfps..L|PARAMETE|
|00005580| 52 53 20 74 63 43 6f 6d | 6d 61 6e 64 0d 0a 4c 4f |RS tcCom|mand..LO|
|00005590| 43 41 4c 20 6c 63 43 6f | 6d 6d 61 6e 64 2c 6c 63 |CAL lcCo|mmand,lc|
|000055a0| 50 61 72 61 6d 31 2c 6c | 63 50 61 72 61 6d 65 74 |Param1,l|cParamet|
|000055b0| 65 72 2c 6c 63 41 6c 69 | 61 73 2c 6c 63 56 46 50 |er,lcAli|as,lcVFP|
|000055c0| 53 50 72 6f 74 6f 63 6f | 6c 2c 6c 6e 56 46 50 53 |SProtoco|l,lnVFPS|
|000055d0| 50 72 6f 74 6f 63 6f 6c | 4c 65 6e 0d 0a 4c 4f 43 |Protocol|Len..LOC|
|000055e0| 41 4c 20 6c 63 56 61 72 | 69 61 62 6c 65 2c 6c 63 |AL lcVar|iable,lc|
|000055f0| 43 6f 64 65 2c 6c 6e 43 | 6f 75 6e 74 2c 6c 6e 41 |Code,lnC|ount,lnA|
|00005600| 74 50 6f 73 2c 6c 6c 45 | 6e 61 62 6c 65 64 2c 6c |tPos,llE|nabled,l|
|00005610| 75 52 65 73 75 6c 74 2c | 6c 6c 42 75 73 79 0d 0a |uResult,|llBusy..|
|00005620| 0d 0a 49 46 20 74 68 69 | 73 2e 6c 52 65 6c 65 61 |..IF thi|s.lRelea|
|00005630| 73 65 20 4f 52 20 45 4d | 50 54 59 28 74 63 43 6f |se OR EM|PTY(tcCo|
|00005640| 6d 6d 61 6e 64 29 0d 0a | 09 52 45 54 55 52 4e 20 |mmand)..|.RETURN |
|00005650| 2e 46 2e 0d 0a 45 4e 44 | 49 46 0d 0a 6c 6c 42 75 |.F...END|IF..llBu|
|00005660| 73 79 3d 74 68 69 73 2e | 6c 42 75 73 79 0d 0a 74 |sy=this.|lBusy..t|
|00005670| 68 69 73 2e 53 65 74 42 | 75 73 79 53 74 61 74 65 |his.SetB|usyState|
|00005680| 28 2e 54 2e 29 0d 0a 6c | 6c 45 6e 61 62 6c 65 64 |(.T.)..l|lEnabled|
|00005690| 3d 74 68 69 73 2e 45 6e | 61 62 6c 65 64 0d 0a 49 |=this.En|abled..I|
|000056a0| 46 20 74 68 69 73 2e 6f | 48 6f 73 74 2e 56 69 73 |F this.o|Host.Vis|
|000056b0| 69 62 6c 65 0d 0a 09 74 | 68 69 73 2e 45 6e 61 62 |ible...t|his.Enab|
|000056c0| 6c 65 64 3d 2e 46 2e 0d | 0a 45 4e 44 49 46 0d 0a |led=.F..|.ENDIF..|
|000056d0| 6c 63 43 6f 6d 6d 61 6e | 64 3d 4c 4f 57 45 52 28 |lcComman|d=LOWER(|
|000056e0| 41 4c 4c 54 52 49 4d 28 | 74 63 43 6f 6d 6d 61 6e |ALLTRIM(|tcComman|
|000056f0| 64 29 29 0d 0a 6c 63 56 | 46 50 53 50 72 6f 74 6f |d))..lcV|FPSProto|
|00005700| 63 6f 6c 3d 4c 4f 57 45 | 52 28 74 68 69 73 2e 63 |col=LOWE|R(this.c|
|00005710| 56 46 50 53 50 72 6f 74 | 6f 63 6f 6c 29 0d 0a 6c |VFPSProt|ocol)..l|
|00005720| 6e 56 46 50 53 50 72 6f | 74 6f 63 6f 6c 4c 65 6e |nVFPSPro|tocolLen|
|00005730| 3d 4c 45 4e 28 6c 63 56 | 46 50 53 50 72 6f 74 6f |=LEN(lcV|FPSProto|
|00005740| 63 6f 6c 29 0d 0a 49 46 | 20 4c 45 46 54 28 6c 63 |col)..IF| LEFT(lc|
|00005750| 43 6f 6d 6d 61 6e 64 2c | 6c 6e 56 46 50 53 50 72 |Command,|lnVFPSPr|
|00005760| 6f 74 6f 63 6f 6c 4c 65 | 6e 29 3d 3d 6c 63 56 46 |otocolLe|n)==lcVF|
|00005770| 50 53 50 72 6f 74 6f 63 | 6f 6c 0d 0a 09 6c 63 43 |PSProtoc|ol...lcC|
|00005780| 6f 6d 6d 61 6e 64 3d 41 | 4c 4c 54 52 49 4d 28 53 |ommand=A|LLTRIM(S|
|00005790| 55 42 53 54 52 28 6c 63 | 43 6f 6d 6d 61 6e 64 2c |UBSTR(lc|Command,|
|000057a0| 6c 6e 56 46 50 53 50 72 | 6f 74 6f 63 6f 6c 4c 65 |lnVFPSPr|otocolLe|
|000057b0| 6e 2b 31 29 29 0d 0a 45 | 4e 44 49 46 0d 0a 44 4f |n+1))..E|NDIF..DO|
|000057c0| 20 57 48 49 4c 45 20 4c | 45 46 54 28 6c 63 43 6f | WHILE L|EFT(lcCo|
|000057d0| 6d 6d 61 6e 64 2c 31 29 | 3d 3d 22 2f 22 0d 0a 09 |mmand,1)|=="/"...|
|000057e0| 6c 63 43 6f 6d 6d 61 6e | 64 3d 41 4c 4c 54 52 49 |lcComman|d=ALLTRI|
|000057f0| 4d 28 53 55 42 53 54 52 | 28 6c 63 43 6f 6d 6d 61 |M(SUBSTR|(lcComma|
|00005800| 6e 64 2c 32 29 29 0d 0a | 45 4e 44 44 4f 0d 0a 44 |nd,2))..|ENDDO..D|
|00005810| 4f 20 57 48 49 4c 45 20 | 52 49 47 48 54 28 6c 63 |O WHILE |RIGHT(lc|
|00005820| 43 6f 6d 6d 61 6e 64 2c | 31 29 3d 3d 22 2f 22 0d |Command,|1)=="/".|
|00005830| 0a 09 6c 63 43 6f 6d 6d | 61 6e 64 3d 41 4c 4c 54 |..lcComm|and=ALLT|
|00005840| 52 49 4d 28 4c 45 46 54 | 28 6c 63 43 6f 6d 6d 61 |RIM(LEFT|(lcComma|
|00005850| 6e 64 2c 4c 45 4e 28 6c | 63 43 6f 6d 6d 61 6e 64 |nd,LEN(l|cCommand|
|00005860| 29 2d 31 29 29 0d 0a 45 | 4e 44 44 4f 0d 0a 6c 6e |)-1))..E|NDDO..ln|
|00005870| 41 74 50 6f 73 3d 41 54 | 28 22 3f 22 2c 6c 63 43 |AtPos=AT|("?",lcC|
|00005880| 6f 6d 6d 61 6e 64 29 0d | 0a 49 46 20 6c 6e 41 74 |ommand).|.IF lnAt|
|00005890| 50 6f 73 3e 30 0d 0a 09 | 74 68 69 73 2e 53 65 74 |Pos>0...|this.Set|
|000058a0| 50 61 72 61 6d 28 6c 63 | 43 6f 6d 6d 61 6e 64 29 |Param(lc|Command)|
|000058b0| 0d 0a 09 6c 63 43 6f 6d | 6d 61 6e 64 3d 41 4c 4c |...lcCom|mand=ALL|
|000058c0| 54 52 49 4d 28 4c 45 46 | 54 28 6c 63 43 6f 6d 6d |TRIM(LEF|T(lcComm|
|000058d0| 61 6e 64 2c 6c 6e 41 74 | 50 6f 73 2d 31 29 29 0d |and,lnAt|Pos-1)).|
|000058e0| 0a 45 4e 44 49 46 0d 0a | 46 4f 52 20 6c 6e 43 6f |.ENDIF..|FOR lnCo|
|000058f0| 75 6e 74 20 3d 20 31 20 | 54 4f 20 74 68 69 73 2e |unt = 1 |TO this.|
|00005900| 6e 50 61 72 61 6d 43 6f | 75 6e 74 0d 0a 09 6c 63 |nParamCo|unt...lc|
|00005910| 50 61 72 61 6d 65 74 65 | 72 3d 74 68 69 73 2e 61 |Paramete|r=this.a|
|00005920| 50 61 72 61 6d 5b 6c 6e | 43 6f 75 6e 74 5d 0d 0a |Param[ln|Count]..|
|00005930| 09 6c 6e 41 74 50 6f 73 | 3d 41 54 28 22 3d 22 2c |.lnAtPos|=AT("=",|
|00005940| 6c 63 50 61 72 61 6d 65 | 74 65 72 29 0d 0a 09 49 |lcParame|ter)...I|
|00005950| 46 20 6c 6e 41 74 50 6f | 73 3d 30 0d 0a 09 09 6c |F lnAtPo|s=0....l|
|00005960| 63 56 61 72 69 61 62 6c | 65 3d 22 22 0d 0a 09 45 |cVariabl|e=""...E|
|00005970| 4c 53 45 0d 0a 09 09 6c | 63 56 61 72 69 61 62 6c |LSE....l|cVariabl|
|00005980| 65 3d 41 4c 4c 54 52 49 | 4d 28 4c 45 46 54 28 6c |e=ALLTRI|M(LEFT(l|
|00005990| 63 50 61 72 61 6d 65 74 | 65 72 2c 6c 6e 41 74 50 |cParamet|er,lnAtP|
|000059a0| 6f 73 2d 31 29 29 0d 0a | 09 09 6c 63 50 61 72 61 |os-1))..|..lcPara|
|000059b0| 6d 65 74 65 72 3d 41 4c | 4c 54 52 49 4d 28 53 55 |meter=AL|LTRIM(SU|
|000059c0| 42 53 54 52 28 6c 63 50 | 61 72 61 6d 65 74 65 72 |BSTR(lcP|arameter|
|000059d0| 2c 6c 6e 41 74 50 6f 73 | 2b 31 29 29 0d 0a 09 45 |,lnAtPos|+1))...E|
|000059e0| 4e 44 49 46 0d 0a 09 49 | 46 20 4c 45 46 54 28 6c |NDIF...I|F LEFT(l|
|000059f0| 63 50 61 72 61 6d 65 74 | 65 72 2c 31 29 3d 3d 22 |cParamet|er,1)=="|
|00005a00| 28 22 20 41 4e 44 20 52 | 49 47 48 54 28 6c 63 50 |(" AND R|IGHT(lcP|
|00005a10| 61 72 61 6d 65 74 65 72 | 2c 31 29 3d 3d 22 29 22 |arameter|,1)==")"|
|00005a20| 0d 0a 09 09 49 46 20 53 | 54 52 54 52 41 4e 28 53 |....IF S|TRTRAN(S|
|00005a30| 54 52 54 52 41 4e 28 6c | 63 50 61 72 61 6d 65 74 |TRTRAN(l|cParamet|
|00005a40| 65 72 2c 43 48 52 28 39 | 29 2c 22 22 29 2c 22 20 |er,CHR(9|),"")," |
|00005a50| 22 2c 22 22 29 3d 3d 22 | 28 29 22 0d 0a 09 09 09 |","")=="|()".....|
|00005a60| 74 68 69 73 2e 61 50 61 | 72 61 6d 5b 6c 6e 43 6f |this.aPa|ram[lnCo|
|00005a70| 75 6e 74 5d 3d 22 22 0d | 0a 09 09 45 4c 53 45 0d |unt]="".|...ELSE.|
|00005a80| 0a 09 09 09 74 68 69 73 | 2e 61 50 61 72 61 6d 5b |....this|.aParam[|
|00005a90| 6c 6e 43 6f 75 6e 74 5d | 3d 45 56 41 4c 55 41 54 |lnCount]|=EVALUAT|
|00005aa0| 45 28 6c 63 50 61 72 61 | 6d 65 74 65 72 29 0d 0a |E(lcPara|meter)..|
|00005ab0| 09 09 45 4e 44 49 46 0d | 0a 09 45 4c 53 45 0d 0a |..ENDIF.|..ELSE..|
|00005ac0| 09 09 74 68 69 73 2e 61 | 50 61 72 61 6d 5b 6c 6e |..this.a|Param[ln|
|00005ad0| 43 6f 75 6e 74 5d 3d 6c | 63 50 61 72 61 6d 65 74 |Count]=l|cParamet|
|00005ae0| 65 72 0d 0a 09 45 4e 44 | 49 46 0d 0a 09 49 46 20 |er...END|IF...IF |
|00005af0| 4e 4f 54 20 45 4d 50 54 | 59 28 6c 63 56 61 72 69 |NOT EMPT|Y(lcVari|
|00005b00| 61 62 6c 65 29 0d 0a 09 | 09 6c 63 50 61 72 61 6d |able)...|.lcParam|
|00005b10| 65 74 65 72 3d 74 68 69 | 73 2e 61 50 61 72 61 6d |eter=thi|s.aParam|
|00005b20| 5b 6c 6e 43 6f 75 6e 74 | 5d 0d 0a 09 09 50 52 49 |[lnCount|]....PRI|
|00005b30| 56 41 54 45 20 28 6c 63 | 56 61 72 69 61 62 6c 65 |VATE (lc|Variable|
|00005b40| 29 0d 0a 09 09 6c 63 43 | 6f 64 65 3d 6c 63 56 61 |)....lcC|ode=lcVa|
|00005b50| 72 69 61 62 6c 65 2b 22 | 3d 6c 63 50 61 72 61 6d |riable+"|=lcParam|
|00005b60| 65 74 65 72 22 0d 0a 09 | 09 26 6c 63 43 6f 64 65 |eter"...|.&lcCode|
|00005b70| 0d 0a 09 45 4e 44 49 46 | 0d 0a 45 4e 44 46 4f 52 |...ENDIF|..ENDFOR|
|00005b80| 0d 0a 6c 63 50 61 72 61 | 6d 31 3d 74 68 69 73 2e |..lcPara|m1=this.|
|00005b90| 61 50 61 72 61 6d 5b 31 | 5d 0d 0a 49 46 20 74 68 |aParam[1|]..IF th|
|00005ba0| 69 73 2e 6c 44 65 62 75 | 67 0d 0a 09 41 43 54 49 |is.lDebu|g...ACTI|
|00005bb0| 56 41 54 45 20 53 43 52 | 45 45 4e 0d 0a 09 3f 20 |VATE SCR|EEN...? |
|00005bc0| 50 52 4f 47 52 41 4d 28 | 29 0d 0a 09 3f 20 22 43 |PROGRAM(|)...? "C|
|00005bd0| 6f 6d 6d 61 6e 64 3a 20 | 22 2b 6c 63 43 6f 6d 6d |ommand: |"+lcComm|
|00005be0| 61 6e 64 2b 22 20 20 50 | 61 72 61 6d 3a 20 22 2b |and+"  P|aram: "+|
|00005bf0| 74 68 69 73 2e 63 50 61 | 72 61 6d 0d 0a 45 4e 44 |this.cPa|ram..END|
|00005c00| 49 46 0d 0a 44 4f 20 43 | 41 53 45 0d 0a 09 43 41 |IF..DO C|ASE...CA|
|00005c10| 53 45 20 6c 63 43 6f 6d | 6d 61 6e 64 3d 3d 22 72 |SE lcCom|mand=="r|
|00005c20| 65 66 72 65 73 68 22 0d | 0a 09 09 6c 75 52 65 73 |efresh".|...luRes|
|00005c30| 75 6c 74 3d 74 68 69 73 | 2e 52 65 66 72 65 73 68 |ult=this|.Refresh|
|00005c40| 32 28 29 0d 0a 09 43 41 | 53 45 20 6c 63 43 6f 6d |2()...CA|SE lcCom|
|00005c50| 6d 61 6e 64 3d 3d 22 72 | 65 6c 65 61 73 65 68 6f |mand=="r|eleaseho|
|00005c60| 73 74 22 0d 0a 09 09 6c | 75 52 65 73 75 6c 74 3d |st"....l|uResult=|
|00005c70| 74 68 69 73 2e 52 65 6c | 65 61 73 65 48 6f 73 74 |this.Rel|easeHost|
|00005c80| 28 29 0d 0a 09 43 41 53 | 45 20 6c 63 43 6f 6d 6d |()...CAS|E lcComm|
|00005c90| 61 6e 64 3d 3d 22 72 75 | 6e 61 63 74 69 6f 6e 22 |and=="ru|naction"|
|00005ca0| 0d 0a 09 09 6c 75 52 65 | 73 75 6c 74 3d 74 68 69 |....luRe|sult=thi|
|00005cb0| 73 2e 52 75 6e 41 63 74 | 69 6f 6e 28 6c 63 50 61 |s.RunAct|ion(lcPa|
|00005cc0| 72 61 6d 31 29 0d 0a 09 | 43 41 53 45 20 6c 63 43 |ram1)...|CASE lcC|
|00005cd0| 6f 6d 6d 61 6e 64 3d 3d | 22 72 75 6e 6d 65 74 68 |ommand==|"runmeth|
|00005ce0| 6f 64 22 0d 0a 09 09 6c | 63 50 61 72 61 6d 31 3d |od"....l|cParam1=|
|00005cf0| 74 68 69 73 2e 63 50 61 | 72 61 6d 0d 0a 09 09 49 |this.cPa|ram....I|
|00005d00| 46 20 4e 4f 54 20 52 49 | 47 48 54 28 6c 63 50 61 |F NOT RI|GHT(lcPa|
|00005d10| 72 61 6d 31 2c 31 29 3d | 3d 22 29 22 0d 0a 09 09 |ram1,1)=|=")"....|
|00005d20| 09 6c 63 50 61 72 61 6d | 31 3d 6c 63 50 61 72 61 |.lcParam|1=lcPara|
|00005d30| 6d 31 2b 22 28 29 22 0d | 0a 09 09 45 4e 44 49 46 |m1+"()".|...ENDIF|
|00005d40| 0d 0a 09 09 6c 75 52 65 | 73 75 6c 74 3d 74 68 69 |....luRe|sult=thi|
|00005d50| 73 2e 26 6c 63 50 61 72 | 61 6d 31 0d 0a 09 43 41 |s.&lcPar|am1...CA|
|00005d60| 53 45 20 6c 63 43 6f 6d | 6d 61 6e 64 3d 3d 22 72 |SE lcCom|mand=="r|
|00005d70| 75 6e 63 6f 64 65 22 0d | 0a 09 09 6c 75 52 65 73 |uncode".|...luRes|
|00005d80| 75 6c 74 3d 74 68 69 73 | 2e 52 75 6e 43 6f 64 65 |ult=this|.RunCode|
|00005d90| 28 6c 63 50 61 72 61 6d | 31 29 0d 0a 09 43 41 53 |(lcParam|1)...CAS|
|00005da0| 45 20 6c 63 43 6f 6d 6d | 61 6e 64 3d 3d 22 72 75 |E lcComm|and=="ru|
|00005db0| 6e 73 63 72 69 70 74 22 | 0d 0a 09 09 6c 63 41 6c |nscript"|....lcAl|
|00005dc0| 69 61 73 3d 22 22 0d 0a | 09 09 6c 6e 41 74 50 6f |ias=""..|..lnAtPo|
|00005dd0| 73 3d 41 54 28 22 3a 3a | 22 2c 6c 63 50 61 72 61 |s=AT("::|",lcPara|
|00005de0| 6d 31 29 0d 0a 09 09 49 | 46 20 6c 6e 41 74 50 6f |m1)....I|F lnAtPo|
|00005df0| 73 3e 30 0d 0a 09 09 09 | 6c 63 41 6c 69 61 73 3d |s>0.....|lcAlias=|
|00005e00| 41 4c 4c 54 52 49 4d 28 | 4c 45 46 54 28 6c 63 50 |ALLTRIM(|LEFT(lcP|
|00005e10| 61 72 61 6d 31 2c 6c 6e | 41 74 50 6f 73 2d 31 29 |aram1,ln|AtPos-1)|
|00005e20| 29 0d 0a 09 09 09 6c 63 | 50 61 72 61 6d 31 3d 41 |).....lc|Param1=A|
|00005e30| 4c 4c 54 52 49 4d 28 53 | 55 42 53 54 52 28 6c 63 |LLTRIM(S|UBSTR(lc|
|00005e40| 50 61 72 61 6d 31 2c 6c | 6e 41 74 50 6f 73 2b 32 |Param1,l|nAtPos+2|
|00005e50| 29 29 0d 0a 09 09 45 4e | 44 49 46 0d 0a 09 09 6c |))....EN|DIF....l|
|00005e60| 75 52 65 73 75 6c 74 3d | 74 68 69 73 2e 52 75 6e |uResult=|this.Run|
|00005e70| 53 63 72 69 70 74 28 6c | 63 50 61 72 61 6d 31 2c |Script(l|cParam1,|
|00005e80| 6c 63 41 6c 69 61 73 29 | 0d 0a 09 43 41 53 45 20 |lcAlias)|...CASE |
|00005e90| 6c 63 43 6f 6d 6d 61 6e | 64 3d 3d 22 76 69 65 77 |lcComman|d=="view|
|00005ea0| 73 6f 75 72 63 65 22 0d | 0a 09 09 6c 75 52 65 73 |source".|...luRes|
|00005eb0| 75 6c 74 3d 74 68 69 73 | 2e 56 69 65 77 53 6f 75 |ult=this|.ViewSou|
|00005ec0| 72 63 65 28 29 0d 0a 09 | 4f 54 48 45 52 57 49 53 |rce()...|OTHERWIS|
|00005ed0| 45 0d 0a 09 09 6c 75 52 | 65 73 75 6c 74 3d 2e 46 |E....luR|esult=.F|
|00005ee0| 2e 0d 0a 45 4e 44 43 41 | 53 45 0d 0a 74 68 69 73 |...ENDCA|SE..this|
|00005ef0| 2e 45 6e 61 62 6c 65 64 | 3d 6c 6c 45 6e 61 62 6c |.Enabled|=llEnabl|
|00005f00| 65 64 0d 0a 74 68 69 73 | 2e 53 65 74 42 75 73 79 |ed..this|.SetBusy|
|00005f10| 53 74 61 74 65 28 6c 6c | 42 75 73 79 29 0d 0a 52 |State(ll|Busy)..R|
|00005f20| 45 54 55 52 4e 20 6c 75 | 52 65 73 75 6c 74 0d 0a |ETURN lu|Result..|
|00005f30| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 50 52 4f 43 45 |..ENDPRO|C..PROCE|
|00005f40| 44 55 52 45 20 72 75 6e | 61 63 74 69 6f 6e 0d 0a |DURE run|action..|
|00005f50| 4c 50 41 52 41 4d 45 54 | 45 52 53 20 74 63 4d 65 |LPARAMET|ERS tcMe|
|00005f60| 74 68 6f 64 0d 0a 4c 4f | 43 41 4c 20 6c 63 4d 65 |thod..LO|CAL lcMe|
|00005f70| 74 68 6f 64 2c 6c 6c 52 | 65 73 75 6c 74 2c 6c 6c |thod,llR|esult,ll|
|00005f80| 42 75 73 79 0d 0a 0d 0a | 74 68 69 73 2e 75 52 65 |Busy....|this.uRe|
|00005f90| 73 75 6c 74 3d 2e 54 2e | 0d 0a 49 46 20 74 68 69 |sult=.T.|..IF thi|
|00005fa0| 73 2e 6c 52 65 6c 65 61 | 73 65 20 4f 52 20 45 4d |s.lRelea|se OR EM|
|00005fb0| 50 54 59 28 74 63 4d 65 | 74 68 6f 64 29 20 4f 52 |PTY(tcMe|thod) OR|
|00005fc0| 20 54 59 50 45 28 22 74 | 68 69 73 2e 6f 41 63 74 | TYPE("t|his.oAct|
|00005fd0| 69 6f 6e 22 29 23 22 4f | 22 20 4f 52 20 49 53 4e |ion")#"O|" OR ISN|
|00005fe0| 55 4c 4c 28 74 68 69 73 | 2e 6f 41 63 74 69 6f 6e |ULL(this|.oAction|
|00005ff0| 29 0d 0a 09 52 45 54 55 | 52 4e 20 2e 46 2e 0d 0a |)...RETU|RN .F...|
|00006000| 45 4e 44 49 46 0d 0a 6c | 63 4d 65 74 68 6f 64 3d |ENDIF..l|cMethod=|
|00006010| 4c 4f 57 45 52 28 41 4c | 4c 54 52 49 4d 28 74 63 |LOWER(AL|LTRIM(tc|
|00006020| 4d 65 74 68 6f 64 29 29 | 0d 0a 49 46 20 45 4d 50 |Method))|..IF EMP|
|00006030| 54 59 28 6c 63 4d 65 74 | 68 6f 64 29 20 4f 52 20 |TY(lcMet|hod) OR |
|00006040| 4e 4f 54 20 50 45 4d 53 | 54 41 54 55 53 28 74 68 |NOT PEMS|TATUS(th|
|00006050| 69 73 2e 6f 41 63 74 69 | 6f 6e 2c 6c 63 4d 65 74 |is.oActi|on,lcMet|
|00006060| 68 6f 64 2c 35 29 20 4f | 52 20 3b 0d 0a 09 09 50 |hod,5) O|R ;....P|
|00006070| 45 4d 53 54 41 54 55 53 | 28 74 68 69 73 2e 6f 41 |EMSTATUS|(this.oA|
|00006080| 63 74 69 6f 6e 2c 6c 63 | 4d 65 74 68 6f 64 2c 32 |ction,lc|Method,2|
|00006090| 29 20 4f 52 20 3b 0d 0a | 09 09 4e 4f 54 20 50 45 |) OR ;..|..NOT PE|
|000060a0| 4d 53 54 41 54 55 53 28 | 74 68 69 73 2e 6f 41 63 |MSTATUS(|this.oAc|
|000060b0| 74 69 6f 6e 2c 6c 63 4d | 65 74 68 6f 64 2c 33 29 |tion,lcM|ethod,3)|
|000060c0| 3d 3d 22 4d 65 74 68 6f | 64 22 0d 0a 09 52 45 54 |=="Metho|d"...RET|
|000060d0| 55 52 4e 20 2e 46 2e 0d | 0a 45 4e 44 49 46 0d 0a |URN .F..|.ENDIF..|
|000060e0| 6c 6c 42 75 73 79 3d 74 | 68 69 73 2e 6c 42 75 73 |llBusy=t|his.lBus|
|000060f0| 79 0d 0a 74 68 69 73 2e | 53 65 74 42 75 73 79 53 |y..this.|SetBusyS|
|00006100| 74 61 74 65 28 2e 54 2e | 29 0d 0a 6c 6c 52 65 73 |tate(.T.|)..llRes|
|00006110| 75 6c 74 3d 45 56 41 4c | 55 41 54 45 28 22 74 68 |ult=EVAL|UATE("th|
|00006120| 69 73 2e 6f 41 63 74 69 | 6f 6e 2e 22 2b 6c 63 4d |is.oActi|on."+lcM|
|00006130| 65 74 68 6f 64 2b 22 28 | 29 22 29 0d 0a 6c 6c 42 |ethod+"(|)")..llB|
|00006140| 75 73 79 3d 74 68 69 73 | 2e 6c 42 75 73 79 0d 0a |usy=this|.lBusy..|
|00006150| 74 68 69 73 2e 53 65 74 | 42 75 73 79 53 74 61 74 |this.Set|BusyStat|
|00006160| 65 28 6c 6c 42 75 73 79 | 29 0d 0a 52 45 54 55 52 |e(llBusy|)..RETUR|
|00006170| 4e 20 6c 6c 52 65 73 75 | 6c 74 0d 0a 0d 0a 45 4e |N llResu|lt....EN|
|00006180| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00006190| 20 66 69 6c 65 74 6f 73 | 74 72 69 6e 67 0d 0a 4c | filetos|tring..L|
|000061a0| 50 41 52 41 4d 45 54 45 | 52 53 20 74 63 46 69 6c |PARAMETE|RS tcFil|
|000061b0| 65 4e 61 6d 65 0d 0a 4c | 4f 43 41 4c 20 6c 63 46 |eName..L|OCAL lcF|
|000061c0| 69 6c 65 4e 61 6d 65 2c | 6c 6e 4c 61 73 74 53 65 |ileName,|lnLastSe|
|000061d0| 6c 65 63 74 2c 6c 63 41 | 6c 69 61 73 2c 6c 63 54 |lect,lcA|lias,lcT|
|000061e0| 65 78 74 0d 0a 0d 0a 49 | 46 20 50 41 52 41 4d 45 |ext....I|F PARAME|
|000061f0| 54 45 52 53 28 29 23 31 | 20 20 4f 52 20 54 59 50 |TERS()#1|  OR TYP|
|00006200| 45 28 22 74 63 46 69 6c | 65 4e 61 6d 65 22 29 23 |E("tcFil|eName")#|
|00006210| 22 43 22 20 4f 52 20 45 | 4d 50 54 59 28 74 63 46 |"C" OR E|MPTY(tcF|
|00006220| 69 6c 65 4e 61 6d 65 29 | 0d 0a 09 52 45 54 55 52 |ileName)|...RETUR|
|00006230| 4e 20 22 22 0d 0a 45 4e | 44 49 46 0d 0a 6c 63 46 |N ""..EN|DIF..lcF|
|00006240| 69 6c 65 4e 61 6d 65 3d | 41 4c 4c 54 52 49 4d 28 |ileName=|ALLTRIM(|
|00006250| 74 63 46 69 6c 65 4e 61 | 6d 65 29 0d 0a 49 46 20 |tcFileNa|me)..IF |
|00006260| 4e 4f 54 20 22 2e 22 24 | 6c 63 46 69 6c 65 4e 61 |NOT "."$|lcFileNa|
|00006270| 6d 65 0d 0a 09 6c 63 46 | 69 6c 65 4e 61 6d 65 3d |me...lcF|ileName=|
|00006280| 6c 63 46 69 6c 65 4e 61 | 6d 65 2b 22 2e 74 78 74 |lcFileNa|me+".txt|
|00006290| 22 0d 0a 45 4e 44 49 46 | 0d 0a 6c 6e 4c 61 73 74 |"..ENDIF|..lnLast|
|000062a0| 53 65 6c 65 63 74 3d 53 | 45 4c 45 43 54 28 29 0d |Select=S|ELECT().|
|000062b0| 0a 6c 63 41 6c 69 61 73 | 3d 4c 4f 57 45 52 28 53 |.lcAlias|=LOWER(S|
|000062c0| 59 53 28 32 30 31 35 29 | 29 0d 0a 43 52 45 41 54 |YS(2015)|)..CREAT|
|000062d0| 45 20 43 55 52 53 4f 52 | 20 28 6c 63 41 6c 69 61 |E CURSOR| (lcAlia|
|000062e0| 73 29 20 28 54 65 78 74 | 20 4d 29 0d 0a 41 50 50 |s) (Text| M)..APP|
|000062f0| 45 4e 44 20 42 4c 41 4e | 4b 0d 0a 41 50 50 45 4e |END BLAN|K..APPEN|
|00006300| 44 20 4d 45 4d 4f 20 54 | 65 78 74 20 46 52 4f 4d |D MEMO T|ext FROM|
|00006310| 20 28 74 63 46 69 6c 65 | 4e 61 6d 65 29 20 4f 56 | (tcFile|Name) OV|
|00006320| 45 52 57 52 49 54 45 0d | 0a 6c 63 54 65 78 74 3d |ERWRITE.|.lcText=|
|00006330| 54 65 78 74 0d 0a 55 53 | 45 20 49 4e 20 28 6c 63 |Text..US|E IN (lc|
|00006340| 41 6c 69 61 73 29 0d 0a | 53 45 4c 45 43 54 20 28 |Alias)..|SELECT (|
|00006350| 6c 6e 4c 61 73 74 53 65 | 6c 65 63 74 29 0d 0a 52 |lnLastSe|lect)..R|
|00006360| 45 54 55 52 4e 20 6c 63 | 54 65 78 74 0d 0a 0d 0a |ETURN lc|Text....|
|00006370| 45 4e 44 50 52 4f 43 0d | 0a 50 52 4f 43 45 44 55 |ENDPROC.|.PROCEDU|
|00006380| 52 45 20 73 74 72 69 6e | 67 74 6f 66 69 6c 65 0d |RE strin|gtofile.|
|00006390| 0a 4c 50 41 52 41 4d 45 | 54 45 52 53 20 74 63 54 |.LPARAME|TERS tcT|
|000063a0| 65 78 74 2c 74 63 46 69 | 6c 65 4e 61 6d 65 0d 0a |ext,tcFi|leName..|
|000063b0| 4c 4f 43 41 4c 20 6c 63 | 46 69 6c 65 4e 61 6d 65 |LOCAL lc|FileName|
|000063c0| 2c 6c 6e 4c 61 73 74 53 | 65 6c 65 63 74 2c 6c 63 |,lnLastS|elect,lc|
|000063d0| 41 6c 69 61 73 0d 0a 0d | 0a 49 46 20 50 41 52 41 |Alias...|.IF PARA|
|000063e0| 4d 45 54 45 52 53 28 29 | 23 32 20 4f 52 20 54 59 |METERS()|#2 OR TY|
|000063f0| 50 45 28 22 74 63 54 65 | 78 74 22 29 23 22 43 22 |PE("tcTe|xt")#"C"|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.